Top 10k strings from Educational Compilation 12 (19xx)(-)(ru).trd
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Compilations - Utilities & Educational & Various / Sinclair ZX Spectrum - Compilations - Utilities & Educational - [TRD] (TOSEC-v2007-01-01) /
Back to the directory listing
355 25 "--WY PRAWY--": 19 "2 LET X=0": 18 W O P R O S 16 UUUUUUUUUUUUUUUUUUUUUP 13 ;N;"-WOPROS": 13 ;" WOT PRAWILXNYJ OTWET" 13 "ILI- "; 13 "Da ili Net(D/N)-->"; 13 "//NE TO^NO//" 13 " operator";: 12 "3 LET X=X+1": 11 ;" MOVNO OTWETITX TAK:" 11 "4 PRINT X": 11 "2 PRINT '";: 11 " Dlq otweta navmite na ";: 10 D$="Net.": 10 D$=" wwedite RUN ": 10 "programma?" 10 9 "otwet prawilxnyj?" 9 "+---------+---------+---------+" 8 "Kak Wy dumaete Wa{": 8 "6 GO TO 8": 8 "4 LET X=X+1": 8 "4 IF A<B THEN GO TO 7": 7 a(cp,np)=0 7 "rammy ";: 7 "Kakoe ~islo nape~ataet |ta" 7 "5 PRINT '";: 7 "4 PRINT '";: 7 "3 LET X=0": 6 navmi l`bu` klawi{u" 6 k=i+task*8 6 D$="GO SUB": 6 AAAAAAAAAAAAAAAAAAAAAAAA 6 "| | | |" 6 "n","NET ","EN" 6 "Skolxko ~isel nape~ataet prog-" 6 "Prodolvaem rabotatx s disketoj" 6 "7 PRINT B": 6 "7 PRINT '";: 6 "6 PRINT '";: 6 "5 PRINT A": 6 "5 NEXT K": 6 "4 PRINT K": 6 "4 NEXT K": 6 "4 LET X(K)=K*K": 6 "3 PRINT K": 6 "3 PRINT '";: 6 "2 DIM X(8)": 6 "12 PRINT '";: 6 "1 REM ZIKL": 6 " funkciq";: 6 PRINT ";: 6 Navmite l`bu` klawi{u..." 6 5 DDDDDDDDDDDDDDDDDDDD 5 D$="okonhen": 5 D$="0 OK, 30:1": 5 . 5 "programmy?" 5 "programme ";: 5 "programma ";: 5 "^to nape~ataet programma ";: 5 "Kakoe ~islo nape~ataet program-" 5 "Kakoe zna~enie priswaiwaetsq" 5 "9 PRINT '";: 5 "6 NEXT K": 5 "5 GO TO 3": 5 "4 PRINT Z": 5 "3 LET X=K*K": 5 "3 LET K=K+1": 5 "2 LET K=0": 5 "1 REM WOWA": 5 "1 REM BELKA": 4 ~@@BDR~DR> 4 y=d(np,cp): 4 x=c(np,cp): 4 t;".";m;".";j 4 b$="pakavy": 4 DDDDDDDDDDDDDDDDDDDDDDDDDDDDD 4 D$="wypoln_ema_ ctroka:": 4 D$="najmite ENTER": 4 D$="40 IF N>10 THEN PRINT N": 4 D$="30>NEXT N": 4 D$="30 GO TO 10": 4 D$="20 GO SUB 40": 4 D$,XS,CS): 4 BBBBDbBDb" 4 BBBBDFBDFB 4 B@@BDJBDJB 4 B<<<~BB~BB 4 <<<<DB<DB> 4 ;"WOT WARIANT PRAWILXNOGO OTWETA" 4 ;"ESLI PRO^ITALI, NAVMITE NA WWOD" 4 8888888888 4 000000000000000000000000000ppp0 4 . 4 . 4 "^to delaet funkciq ";: 4 "WA[A OCENKA- ";S/29 4 "REZULXTAT=';";: 4 "Napi{ite podprogrammu wy~isle-" 4 "GO TO 11" 4 "7 PRINT S": 4 "5 PRINT X": 4 "4 PRINT B$": 4 "4 LET C$=A$+B$": 4 "3 INPUT A": 4 "3 FOR K=1 TO 8": 4 "20 ","EN" 4 "2 LET Z=1": 4 "2 LET S=0": 4 "2 DATA '";: 4 "10 ","EN" 4 "+-----------------------------+" 4 " PRINT";: 4 " 6 STOP": 4 navmite l`bu` klawi{u " 4 navmite l`bu` klawi{u " 3 z1>z;"pada&wi 3 b$="bukwu": 3 a(cp,np)>0 3 a(cp,np)<0 3 SYMBOL SHIFT";: 3 D$="coob`enie:": 3 D$="SILA.COM"+ 3 D$="1 1 1": 3 D$="0 ok, 20:1": 3 CCCCCCCCCC 3 BBBBBBBBBBBBBBBBBBBBBB 3 BBBBBBBBBBBBBBBBBBBBB 3 BBBBBBBBBBB 3 A$="operator 3 ;z;" "; 3 ;"\LEMENTOW TEKSTA. ": 3 ;"ISKL@^ENIE I WOSSTANOWLENIE": 3 88888888888888888 3 8888888888))))))))8 3 . 3 . 3 . 3 *d)/zy)*100 3 ))/zy)*100 3 "| ... |" 3 "ramma ";: 3 "programmy ";: 3 "polu~ili sledu`}ij ukazatelx:": 3 "otwet prawilxnyj?" 3 "nape~ataet" 3 "n","N","NET ","EN" 3 "komandy": 3 "^to nape~ataet programma, esli" 3 "^to nape~ataet programma ";: 3 "WA[A OCENKA- ";S/27 3 "Srawnite dwe programmy:": 3 "Skolxko operatorow nuvno doba-" 3 "POKAZATELX ?'": 3 "OSNOWANIE ?'": 3 "Napi{ite komandu dlq wywoda na" 3 "Kakie perwye tri ~isla nape~a-" 3 "Imeem programmu:": 3 "Disk-(d),Tape-(t)";q$ 3 "9 LET S=S*A": 3 "6 LET S=S+M": 3 "5 PRINT X(K)": 3 "5 PRINT B": 3 "5 LET S=S+X": 3 "5 IF K<20 THEN GO TO 3": 3 "3 LET Z=Z+1": 3 "3 LET X=1": 3 "3 INPUT K": 3 "2 OPEN 'MX1:SPISOK.DAT'": 3 "2 FOR K=1 TO 20 STEP 1": 3 "2 FOR K=1 TO 10 STEP 1": 3 "11 STOP": 3 "11 LET S=S*A": 3 "10 LET S=S*A": 3 "1 REM MAX": 3 "1 REM LENA": 3 "1 REM FOUR": 3 "1 REM ";: 3 "1 ","2 ","3 ","EN" 3 "1 ","1 ","1 ","EN" 3 ""imq programmy""": 3 " komanda";: 3 " 4 NEXT K": 3 " 3 PRINT K": 3 GOSUB ";: 3 2 zx spectrum";: 2 yrlf`[VQLHD@=9630-+(&$" 2 y=f(np,cp): 2 x=e(np,cp): 2 wwedite nomer prawilxnogo otweta": 2 weig>sum+0.5 2 prowerka hiclowyx peremennyx 2 e(l,k)=(l-1 2 dl_ programmnyx ctrok 2 d$="urok 3": 2 b$="smatri": 2 b$="kanec": 2 absol`tnaq weli~ina nazna~itx mesto na diske pokazatelx, priznak ispor~ennyj, plohoj zwuk dwoi~nyj blok bajtow na diske kajma, bord`r (|krana) kratkij qrkostx simwolxnyj krug o~istitx zakrytx (fajl) kod kolonka (tablicy) sceplqtx prodolvatx kopirowatx dannye data opredelitx, zadatx, opisatx udalitx ustrojstwo, priwod razmer ukazatelx, sprawo~nnik prowesti lini` stiratx, udalqtx wypolnitx programmu fajl mercanie dlq perednij plan format po 2 a(cp,np)=b(bc): 2 X(N),Y(N); 2 W(R,D,Q)=Q*4* 2 W(R,D,Q)": 2 U]UQUUUUUEUEUU 2 UUUUUUUUWUU 2 UUUUUUUUUUUUUUUUUUUUUUU 2 UUUUUUUUUUUUUUUUUUUUUU 2 UUUUQUUUUU 2 UUUEEUUUUUUUEEEUUUEEUUUU 2 UUUAAUUUUUUUAAAUUUAAUUUU 2 T(R,D))/3": 2 T(A,B)=A*A*A-(A-B)*(A-B)*(A-B)": 2 O CEKTOPA." 2 N E P R A W I L X N O 2 D$dDD(D$J@ 2 D$T|<0D8Jx 2 D$=C$+" ": 2 D$="wypoln_ema_ ctroka": 2 D$="wwedite RETURN": 2 D$="wwedite GO TO ": 2 D$="wwedite GO SUB": 2 D$="wwedite CONTINUE": 2 D$="urok 5": 2 D$="urok 2": 2 D$="urok 1": 2 D$="snahenie N wywedeno na @kran": 2 D$="snahenie N - "+ 2 D$="operatory:": 2 D$="najmite ENTER ": 2 D$="konez zikla ": 2 D$="ZX BASIC": 2 D$="THEN": 2 D$="REX1.BAS": 2 D$="RETURN": 2 D$="RESTORE": 2 D$="READ": 2 D$="PRINT": 2 D$="PRINT MX0:RODIN.TXT": 2 D$="PONEDELXNIK"+ 2 D$="Operator s metkoj 7.": 2 D$="Oni pisali programmy nezawisimo"+ 2 D$="Na printer.": 2 D$="INPUT": 2 D$="IF N>10 THEN PRINT N": 2 D$="Dwe zapisi.": 2 D$="Dwa rqda.": 2 D$="DATA": 2 D$="50>RETURN": 2 D$="50 RETURN ": 2 D$="40>CIRCLE 128,88,40": 2 D$="30 DRAW -40,-40,2: STOP": 2 D$="20 PRINT N;~ ~;~MASTER SOFT~": 2 D$="20 PRINT N": 2 D$="20 DRAW 40,40": 2 D$="18 STOP": 2 D$="10 PLOT 128,88: STOP": 2 D$="10 INPUT N": 2 D$="10 INPUT N ": 2 D$="10 FOR N=1 TO 5 STEP 2": 2 D$="0 OK, 20:1": 2 D$=" wwedite RUN ": 2 D$=" ": 2 CAPS SHIFT";: 2 ABSOLUTE ALLOCATE ATTRIBUTE BAD BEEP BINARY BLOCK BORDER BRIEF BRIGHT CHARACTER CIRCLE CLEAR CLOSE CODE COLUMN CONCATENATE CONTINUE COPY DATA DATE DEFINE DELETE DEVICE DIMENSION DIRECTORY DRAW ERASE EXECUTE FILE FLASH FOR FOREGROUND FORMAT FULL FUNCTION GET GO HELP IF IN INK INPUT INEGER INVERSE KEY LENGHT LET LIBRARY LINK LIST LOAD MAP MERGE MODULE MOVE NAME NEW NEXT NO NOT OPEN OPTION ORDER OUT OVER PAPER PAUSE PE 2 ABSOLUTE ALLOCATE ATTRIBUTE BAD BEEP BINARY BLOCK BORDER 2 A: RETURN": 2 A$="uclowny' operator 2 A$="perexod k podprogramme ocu`ect- wl_et operator GO SUB, woswrat k ocnowno' programme - RETURN.": 2 A$="ecli de'ctwie powtor_etc_ prog- rammo' ne ziklihecki, a po mere neobxodimocti, ono wydel_etc_ w wide podprogrammy.": 2 ;,,,,,,,,,,: 2 ;"konehnoe": 2 ;"fiziheski 2 ;"dl_ hiclowyx peremennyx icpol^su'te tol^ko zifry": 2 ;"\toj stroki ne su}estwuet": 2 ;"ZUEMYE W REDAKTORE K52. " 2 ;"ZADANIE SEGMENTA REDAKTIROWANIQ": 2 ;"U> - ";: 2 ;"Prawilxnyh naborow-";P 2 ;"PEREPI[ITE SPISOK W TETRADX!!!": 2 ;"Ostalosx-";31 2 ;"OGRANI^ITELX" 2 ;"Neprawilxnyh naborow-";F 2 ;"NEMNOVKO PODOVDITE": 2 ;"NAVMITE NA WWOD DLQ PRODOLVENIQ" 2 ;"MOVETE NAVATX NA KLAWI[U WWOD" 2 ;"MOVETE NAVATX NA KLAWI[U WWOD" 2 ;"Kakoe ~islo nape~ataet |ta" 2 ;"KOMANDY DLQ RABOTY SO WSPOMO-" 2 ;"ISPOLXZOWANIE FUNKCII <";: 2 ;"GATELXNYMI FAJLAMI. ": 2 ;"FUNKCIONALXNYE KLAWI[I, ISPOLX-" 2 ;"FUNKCIONALXNYE KLAWI[I <SU>." 2 ;"DLQ PRODOLVENIQ NAVMITE NA WWOD" 2 ;"BIORITM\"; 2 ;"A.Konew " 2 ;"A.Fedorow" 2 ;"<SELECT> - ";: 2 ;"<CHNGCASE> - ";: 2 ;" NAVMITE NA WWOD DLQ WYHODA " 2 ;" --DOPOLNITELXNOE MEN@-- ": 2 ;" " 2 ; 2 8~DD<$8<r< 2 88888888888888888<<<<<<<888888 2 88888888888888888888888888 2 8888888888888"" 2 5 Sektor : 11 2 10 DATA 3,5 20 READ A,C1,L 30 READ C2 40 DATA 0,-1": 2 0000000000000000000000000000000000000000000000000000000000 2 . 2 . 2 . 2 . 2 . 2 . 2 . 2 . 2 . 2 . 2 . 2 . 2 ,,,,,,,,,,: 2 ,,,,,,,,,,,,,,,,,,: 2 ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,: 2 +"programmy.": 2 +"drug ot druga.": 2 +"MX1:PROBA.DAT": 2 +"LIZA.DAT": 2 +"LISA.BAS"+ 2 'ABSOLUT 'ALOUK\JT 'ATRIBX@T B\D BIP 'BAJNORI BLOK 'BODO BRIF BRAJT 'K\RIKTO SOKL KLYO KLOUZ KOUD 'KOLOM KON'KATIN\JT KON'TINJU 'KOPI 'D\JTO D\JT DI'FAJN DI'LIT DI'WAJS DI'M\N[ON DI'R\KTORI DRO I'R\JZ '\KSIK'@T FAJL FLA[ FO 'FOGRAUND 'FOMAT FUL 'FANK[ON G\T GOU H\LP IF IN INK 'INPUT 'INTIDVO INWOS KI L\NS L\T 'LAJBRORI LINK LIST LOUD M\P MODV 'MOD'@L MUW N\JM N'@ N\KST NOU NOT 'OUPON 'OP[ON 'ODO AUT 'OUWO 'P\JPO POZ PI 2 "|tih ve fajlow s diskety MH1 na" 2 "|ta programma?" 2 "| DIRECTORY |" 2 "| |" 2 "zapis","napis","wywes","ZAPIS","NAPIS","WYWEST","SBROS","CO","disk","DISK","EN" 2 "wyborke?" 2 "wwedite zeloe 0<N<99 "; 2 "wiature.": 2 "wannyj fajl na diskete MH0 ?" 2 "w programme ";: 2 "ukazatelq:": 2 "sistemu komandu ";: 2 "simwola i sohranenie ego w bu-" 2 "revim kursora 2 "redaktirowaniq iz fajla i soh-" 2 "ramme ";: 2 "ramma ";: 2 "programmy i vdatx, poka ~elowek" 2 "programma:": 2 "printer sodervimogo fajla": 2 "print","pe~at","PRINTER","PE^AT","EN" 2 "pri wwode edinicy, esli stroka " 2 "pod nomerom #1, a" 2 "operator";: 2 "od","OD","Od","ed","ED","Ed","1 ","EN" 2 "nivnej funkcii iz dwuh, ukazan-" 2 "ne zawer{it nabor ~isla na kla-" 2 "navatie klawi{i ";: 2 "natx, ~to ~elowek zakon~il na-" 2 "name ","NAME ","EN" 2 "n","N","EN" 2 "i polu~ili sledu`}u` wyborku iz" 2 "hodnogo fajla.": 2 "fere simwola.": 2 "dw","Dw","DWE","2 ","EN" 2 "disketu MH0 takim obrazom, ~to-" 2 "bor ~isla na klawiature?": 2 "^to nape~ataet operator 6 |toj" 2 "^to nape~ataet operator 5 |toj" 2 "^to nape~ataet operator 4 prog-" 2 "^to nape~ataet programma pri" 2 "^emu rawna M w rezulxtate rabo-" 2 "Za skolxko {agow sportsmen pro-" 2 "Wosstanowlenie soder-" 2 "WWEDITE ";: 2 "WA[A OCENKA- ";S/30 2 "Ukavite imena ime`}ihsq na |toj" 2 "Skolxko rqdow stroq pros~itala" 2 "STEPEN ?" 2 "SPISOK ?" 2 "SOLDAT'K": 2 "SE","se","7 ","EN" 2 "RODIN.TXT" 2 "Programmist wwodit komandu:": 2 "Programma ";: 2 "Programma ";: 2 "Po~emu programma ";: 2 "Perewedite na anglijskij qzyk" 2 "Perepi{ite komandu kopirowaniq" 2 "PONEDELXNIK': ";: 2 "Operatory s kakimi metkami pow-" 2 "OB]AQ OCENKA-"; 2 "Napi{ite poslednij operator k" 2 "NOMER ?'": 2 "MX1:PROBA.DAT": 2 "MX0: XONIX.COM": 2 "MX0: PROOP.COM": 2 "MODEL: ";: 2 "MH1. Wwedem komandu:": 2 "Kakoj wariant Bejsika udobnee," 2 "Kakoe ~islo zapi{etsq w q~ejku" 2 "Kakoe imq budet imetx skopiro-" 2 "Kakim obrazom \WM mogla by uz-" 2 "Kakie imena fajlow polu~im w" 2 "Kak Wy dumaete, Wa{": 2 "Izmenenie {rifta" 2 "Issledujte programmu ";: 2 "Imeetsq disketa MH1. Wwedq w" 2 "IMQ=';A$": 2 "Fedorow- pod nomerom #3 ?" 2 "FILL,TABS,ADJUST, WRITE SELECT;" 2 "Esli pro~itali, navmite na WWOD" 2 "DIR MX0: ";: 2 "CAPS SHIFT+SYMBOL SHIFT,";: 2 "Budet li rabotatx sledu`}aq" 2 "BORIS','MARIQ'": 2 "<APPEND>,<CHNGCASE>,<CUT>, <RE-" 2 "9 PRINT S": 2 "9 ON K GOTO 10,11": 2 "8 PRINT Z": 2 "8 PRINT '";: 2 "8 NEXT I": 2 "8 INPUT K": 2 "7 PRINT Z": 2 "64 ","EN" 2 "60 ","EN" 2 "6 |toj programmy budet imetx" 2 "6 PRINT X,Y,Z": 2 "6 PRINT X": 2 "6 PRINT SEG$(S$(2),1,6)" 2 "6 PRINT S": 2 "6 PRINT D": 2 "6 LET M=4": 2 "6 IF X<4 THEN GOTO 4": 2 "6 GO TO 3": 2 "5 PRINT C$": 2 "5 INPUT N: LET M=12-N": 2 "5 INPUT N": 2 "5 IF X<20 THEN GOTO 3": 2 "5 GO SUB 10": 2 "5 ","CO","6 ","EN" 2 "45 ","EN" 2 "4 PRINT X,X,X": 2 "4 PRINT X,X": 2 "4 LET X=1": 2 "4 LET X(2)=15": 2 "4 FOR K=1 TO 50 STEP 1" 2 "3 READ A$": 2 "3 PRINT C": 2 "3 LET Z=Z+2": 2 "3 LET S=0": 2 "3 LET B=5": 2 "3 LET B$='STATES'": 2 "3 INPUT B": 2 "3 DATA '";: 2 "23658",c: 2 "2 LET X=5": 2 "2 LET X=1": 2 "2 LET A$='UNITED-'": 2 "2 LET A$='MAKS'": 2 "2 INPUT A": 2 "2 FOR K=1 TO 8 STEP 1": 2 "2 A$='";: 2 "18","STOP ","EN" 2 "15 ","EN" 2 "13 STOP": 2 "13 GO TO 18": 2 "13 ","EN" 2 "12 STOP": 2 "10 PRINT '";: 2 "10 INPUT D": 2 "1 REM Z1": 2 "1 REM THREE": 2 "1 REM SUMMA": 2 "1 REM SINUS": 2 "1 REM ROUTINE": 2 "1 REM ROST": 2 "1 REM RJAD": 2 "1 REM BOBA 1 REM CBETA" 2 "---WY PRAWY---": 2 "- Specifikaciq ispolxzowaniq" 2 "- Pereme}enie kursora w na~alo" 2 "''"5- Operatory uprawleni_ zwetom"''"6- PAbota c grafiko'"''''" BBEdite nomer uroka >"; 2 ""0.powtorite wwod""": 2 " w stroke 2 " Dlq otweta navmite na ";: 2 " 5 STOP": 2 " 4 PRINT K": 2 " 3 LET X=K*K": 2 " 2 FOR K=1 TO 10 STEP 1": 2 " 17 STOP": 2 " 11 LET M=1": 2 " 1. Da." 2 " " 2 " 2 VERIFY""""": 2 SAVE""""": 2 READ""""": 2 PAPER 2": 2 MERGE""""": 2 LagSoft Disk version ": 2 LOAD""""": 2 INPUT ";: 2 NOWOSIBIRSK 14.2.1994 ": 2 _______ _______ ___ ___ ___ ___ 2 ": 2 2 1 ||||||||||||||||": 1 {ag prira}eniq 1 zzzzzzzzzzzzzzzzzzz 1 zx spectrum ";: 1 zanimalsmB 1 zAZBUKA 1B 1 z1>z;"cnaq " 1 z(j)=z(j)-360 1 z(a)=z(a)-360 1 z(a)=z(a)+360 1 z(a)=a(a): 1 z$="tel. 143-33-03 (spb)": 1 z$="abwgde@vzijklmnoprstufhc~{}^yx|`q" 1 z$(a)=g$(a+12 1 y$="a *bw|g|*d*e*@v|z|i *jka|l|m|no p||r|st|u |fhac|~e{a*{*^y *x| ` q " 1 x=((6.6460656 1 x1=a(cp,np): 1 x1,y1,x2,y2,x3,y3,x4,y4,x5,y5,x6,y6 1 wy~islqet wyravenie posle znaka 1 wy-ravenie 1 wwedi nomer prawilxnogo otweta" 1 wozwedenie w stepenx 1 wozniknutx sledu`}aq situaciq: w raznyh mestah programmy stoqt gruppy odinakowyh operatorow. dlq sokra}eniq ob 1 wosproizwoditx zwuki pri pomo}i operatora: 1 wo wtoroj programme wytesnq`tsq 1 wetstwu`}u` klawi{u. " 1 w seredine |krana. 1 w q~ejki A$. 1 umnovenie i delenie 1 ul=ul-411.6 1 ul=ul+2369.9 1 ul=22639.6 1 uj=julian day, 1 uANIMAL B 1 to~koj; 56.78" 1 to be available, 1 task=task+1 1 t=((uj-2415020 1 sum=sum-m: 1 sum=sum+D(point): 1 slovenie i wy~itanie 1 skolxko tebe let?"";m": 1 skolxko raz budet wypolnen operator ";: 1 sinus h ": 1 s=(s+s1*t+s2*t*t) 1 s(1,1),s(1,2),...,s(1,6) s(2,1),s(2,2),...,s(2,6) s(3,1),s(3,2),...,s(3,6)" 1 re{eniq.cikly. ": 1 ras{irenie";: 1 rabota s wne{nej pamqtx`""": 1 r=(x*x+y*y)^.5 1 r$=r$+z$(b, 1 qwim dwumernyj massiw S s razmernostx` 3,6:": 1 q otweta navmite na ";: 1 prowerim kak wy wse |to uswoili ": 1 prower_et, ne raw-na li peremenna_ zikla predel^- nomu snaheniq.": 1 primer ispolxzowaniq klawiatury:": 1 pridetsq ego powtoritx e}e raz": 1 powtorite wwod""": 1 polovitelxnyj; 1 point=C(curs-4 1 podprogrammy.funkcii."" ": 1 peremennaq 1 o~enx valx,no |tot urok wy ne uswoili": 1 otricatelxnyj." 1 otnositelxno drug druga deleniei umnovenie ime`t rawnye priori-tety(urowni star{instwa),to ve samoe movno skazatx i o slovenii i wy~itanii." 1 osnowy BEJSIKA"" ": 1 oslu{ajte kak zwu~it |ta programma. " 1 operatory BEJSIKA"" ": 1 operacii otno{eniq srawniwa`t dwa operanda.esli uslowie wypol-neno,to rezulxtat rawen 1,w pro-tiwnom slu~ae 0.naprimer,zna~e- nie wyraveniq 2=3 rawno 0,a zna-~enie wyraveniq 3 1 ohictka @krana 1 obytes C 1 o,b+h;m$(i); 1 o+a,e;w$(a); 1 o (Y/N) ?": 1 noj,t.e. esli h=0,to";: 1 neprawilxno";: 1 neizwestno": 1 ne rawno": 1 navatie klawi{i odnowremenno s klawi{ej ";: 1 name,var1,i,k1 " 1 n$'''"Segodny ";t;".";m;".";j 1 move68,72/circle8,25 1 move68,56/circle32,8 1 menx{e ili rawno": 1 mbropic C 1 maly' vrift 1 m=c));j;" ": 1 m=D(point): 1 m(m)-h)+(" 1 m(m));j;" r."; 1 m(i),n(i): 1 m$(a),m(a),l(a): 1 lu=1012395 1 lu=((ol+ul)/m)-( 1 lu1=1203586 1 logi~eskie operacii.""": 1 libo ovidanie komand. 1 lgeb.21B%) 1 lgeb.20B|)/'* 1 lgeb.19Bh+ 1 lgeb.18BO0 1 lgeb.13Bd> 1 l=(ol-lu1)/m 1 l1=((ol-d)-lu)/m 1 konez merzani_ 1 komandy BEJSIKA"" ": 1 klawiatura"" ": 1 kakoj operator wyzywaet bezuslownyj perehod k stroke s nomerom 10 ?": 1 kakoj operator sluvit dlq wwoda ~isel s klawiatury ?": 1 kakoj operator movet priswaiwatx zna~eniq peremennym iz bloka dannyh ?": 1 kakoj operator sohranqet programmu iz pamqti kompx`tera na lentu?": 1 kakoj operator okra{iwaet |kran w sinij cwet?": 1 kakoj operator okra{iwaet bord`r w krasnyj cwet?": 1 kakoj operator obespe~iwaet zagruzku nowoj programmy s lenty w pamqtx kompx`tera ?": 1 kakoj operator obespe~iwaet wozwrat iz podprogrammy ?": 1 kakoe imq movno ispolxzowatx w ka~estwe imeni uprawlq`}ej peremennoj cikla ?": 1 kakaq komanda o~i}aet ws` pamqtx kompx`tera ?": 1 kakaq komanda raspe~atywaet na |krane tekst programmy ?": 1 kak,w revime mikrokalxkulqtora pods~itatx proizwedenie dwuh ~isel: 0,5 i 1000000000 ?": 1 kak wwesti komandu ";: 1 kak w programme peremennoj A priswoitx zna~enie rawnoe 1 k+h,h;"y Bac,ko 1 k+e,h;"cmapa 1 k","cpeqa"," 1 j$(n),m$(n),m(n),l(n): 1 imeetsq uslowie: esli a=0 ili w=0,to perejti k stroke s nomerom 20. kakoj operator wypolnqet |to uslowie?": 1 imeet wid: ";: 1 i$(a)=i$(a,2 1 i wypolnqetsq posledowatelxnostx operatorow, sostawlq`}ih telo cikla." 1 i ocu`ectwl_et pere-xod k nahalu zikla": 1 hBROPIC BF 1 h$(j)=" ": 1 h$(i)=" ": 1 fball C 1 f=(ol-n)/m: 1 esli hotq by odin operand nule-woj - rezulxtat operacii rawen 0": 1 esli argument= 1 esli argument 1 ema programmy i dlq udobstwa wozmovnyh ispraw-lenij w |toj gruppe operatorow ih ob 1 ema om qpyr 1 em vizni. Wy wysoko cenite nezawisimostx, osobenno finansowu` iz-za skry- toj boqzni poterqtx ee. Esli u was nemnogo druzej, oni wernye. W was estx nekotoryj pessimizm ipassiwnostx, strah izolqcii. U was boleznennoe woobravenie i nezdorowye fantazii. Horo{o raz-witaq intuiciq Wa{e blagopriqtnoe polovenie sdelaet was populqrnym.Weroqtno wy obladaete osobymi dostoinst- wami.Razwiwajte w sebe ~uwstwo prekrasnogo. Opasnostx bolx{ih rashodow ili poterx, wozmovna rasto~itelx- nostx. Zdorowxe ne dastsq legko.Wa{e glawnoe dostoinstwo - wa{a re{itelxnostx. Esli wa{a professiq swqzana s umstwennym trudom,to wse OK,ina-~e wam dolvno kazatxsq,~to wy naprasno terqete wremq.Sfera ~e-lowe~eskih otno{enij - ideal. Wy uwidite mnogo peremen: horo- {aq semejnaq viznx i nasledstwo.Wy, wozmovno, izwle~ete polxzu iz kollekcionirowaniq ili drew- nih iskusstw. Vi 1 em vizni. Potaennyj strah denevnyh zatrud-nenij zastawlqet was wysoko ce- nitx nezawisimostx. \to movet sdelatx was odinokim. Gluboko wnutri wy zasten~iwy i o~enx uqzwimy. Wysoko razwita intuiciq. Weroqtno u was estx sklonnostx k alkogol` i narkoti-kam, bolx{aq,~em u drugih. E 1 em roqa-";: 1 em dejstwie grafi~eskih operatorow.": 1 ek ? (Y/N)": 1 edinq`t w 1 edinennaq w pod- programmu,oby~no pome}aetsq w konec programmy i okan~iwaetsq operatorom wozwrata iz podprog- rammy ";: 1 e,c-e;"Hop 1 e (Y/N)?": 1 drug drugom. 1 do :0 do#:1 re :2 re#:3 mi :4 fa :5 fa#:6 solx:7 solx#:8 lq:9 lq#:10 si :11 do :12" 1 dlq zaglawnyh bukw"; 1 dlq whoda w urok navmite ": 1 dlq prodolveniq navmite l`bu` klavi{u " 1 dlq prodolveniq 1 d$="wwedite im_ cleduq`ego uroka?": 1 d$="urok 6": 1 d$="urok 4": 1 d$="pocw_tim emu otdel^ny' urok": 1 d$="operatory:": 1 d$="okonhen": 1 d$="najmite ENTER": 1 d$="dl_ fakul^tatiwnyx san_ti'": 1 d$="clojnyx rasdelow _syka i my": 1 d$="DATA": 1 d$=" wwedite READ ": 1 d$=" wwedite RUN ": 1 curs=curs-1 1 curs=curs+1 1 cur2=cur2-1 1 cur2=cur2+1 1 cur1=cur1-1 1 cur1=cur1+1 1 credni' vrift 1 copy mx1:*.dat mx0: ","COPY MX1:*.DAT MX0: ","EN" 1 c,o^h;" ": 1 c(i,j),d(i,j),e(i,j),f(i,j) 1 boot BV 1 bolx{e ili rawno": 1 bol^vo' vrift 1 blok dannyh.massiwy."" ": 1 bBALL B 1 b*h,q;"1234567890123456789012345678901"( 1 b(i)=a(cp,np): 1 b(bc)=b(i): 1 b(bc)=a(cp,np): 1 b$=y$(ll*2 1 b$="zwanok": 1 b$="zdorawa": 1 b$="zavym": 1 b$="werna": 1 b$="wastok": 1 b$="warona": 1 b$="wal{|bnaq": 1 b$="uvasna": 1 b$="uta~ka": 1 b$="umnica": 1 b$="tormas": 1 b$="sonc|": 1 b$="slowa": 1 b$="serc|": 1 b$="sawa": 1 b$="raboty": 1 b$="prikrasna": 1 b$="praf": 1 b$="ploha": 1 b$="pakavyka": 1 b$="niwerna": 1 b$="nitak": 1 b$="neznae{": 1 b$="nehara{o": 1 b$="nasok": 1 b$="napi{i": 1 b$="mator": 1 b$="masla": 1 b$="malatec": 1 b$="lo{ka": 1 b$="lotka": 1 b$="lafka": 1 b$="karowa": 1 b$="kaf|": 1 b$="hara{o": 1 b$="hahaha": 1 b$="gara{": 1 b$="cyrk": 1 b$="cyfra": 1 b$="a{ipka": 1 b$="azbuka": 1 b$="awe~ka": 1 b$="anv|la": 1 b$="akno": 1 b$="ac|nka": 1 az2.scr C( 1 az2.obj CH 1 az1.cod1C@ 1 awtomati~eski ustanowitsq na stroku s ukazannym nomerom i sama wypolnqetsq.": 1 a(cp,np)=-a(cp,np) 1 a$="~etyre": 1 a$="~a{ka": 1 a$="~asy": 1 a$="}epka": 1 a$="|kran": 1 a$="{wabra": 1 a$="{utka": 1 a$="{ura": 1 a$="{kola": 1 a$="{kaf": 1 a$="{ala{": 1 a$="zwonok": 1 a$="zont": 1 a$="zima": 1 a$="zebra": 1 a$="zavim": 1 a$="zaqc": 1 a$="zanoza": 1 a$="zakat": 1 a$="wowa": 1 a$="wostok": 1 a$="worona": 1 a$="wolga": 1 a$="wilka": 1 a$="wera": 1 a$="vurnal": 1 a$="vara": 1 a$="udo~ka": 1 a$="tu~a": 1 a$="tormoz": 1 a$="teper^ poprobu'te sapuctit^ pro-grammu. dl_ @togo nujno wwecti direktiwy ~RUN~ ili ~GO TO 10~.": 1 a$="tak wygl_dit ctroka programmy na_syke BASIC, werci_ ZX": 1 a$="swinka": 1 a$="stul": 1 a$="strana": 1 a$="stol": 1 a$="sowa": 1 a$="soska": 1 a$="solnce": 1 a$="snahenie peremenno' mojno sada- wat^ i pri wypolnenii programmy.dl_ @togo icpol^suetc_ operator INPUT": 1 a$="slawa": 1 a$="sirop": 1 a$="sila": 1 a$="serdce": 1 a$="sa{a": 1 a$="sahar": 1 a$="ru~ka": 1 a$="roza": 1 a$="rana": 1 a$="raketa": 1 a$="rabota": 1 a$="q}ik": 1 a$="ptica": 1 a$="programma wypolnena. dl_ powto- reni_ uroka najmite RUN, dl_ okonhani_ - lqbo' drugo' opera- tor": 1 a$="pri napicanii cimwol^na_ pere- menna_ otlihaetc_ ot hiclowo' snahkom ~$~. 1 a$="pqtx": 1 a$="polka": 1 a$="pila": 1 a$="pe~ka": 1 a$="perwy' i wtoro' argumenty opre- del_qt dwijenie prowodimo' liniiis teku`e' posizii po oc_m ~x~ i~Y~ cootwetctwenno. ecli argumentow dwa, to prowodi-tc_ pr_ma_ lini_, ecli tri, to duga, ugol kotoro' opredel_etc_ tretim argumentom (w radianax).": 1 a$="pastuh": 1 a$="park": 1 a$="papa": 1 a$="panama": 1 a$="owe~ka": 1 a$="ovibohna_ ctroka uctrn_etc_ di- rektiwo' ~EDIT~. dl_ ee wysowa cleduet odnowre- menno najat^ klawivi CAPS SHIFT i 1": 1 a$="operator ~BORDER~ opredel_et zwet kra_ @krana ": 1 a$="operator opredel_et de'ctwie ilicowokupnoct^ de'ctwi', podleja- `ix icpolneniq komp^qterom 1 a$="operator READ hitaet snahenie peremenno' is cpicka DATA.": 1 a$="operator PRINT wywodit na @kran resul^taty raboty programmy. pri@tom w kahectwe argumenta mogut icpol^sowat^c_ peremennye,": 1 a$="operator LET - odin is naibolee racpoctranennyx. on pricwaiwaet perenenno' kakoe-libo hiclowoe ili cimwol^noe snahenie.": 1 a$="opera": 1 a$="okno": 1 a$="odin": 1 a$="no~x": 1 a$="nosok": 1 a$="norka": 1 a$="nata{a": 1 a$="nasos": 1 a$="motor": 1 a$="most": 1 a$="mi{a": 1 a$="miska": 1 a$="mesto": 1 a$="ma{a": 1 a$="maslo": 1 a$="marka": 1 a$="mama": 1 a$="lovka": 1 a$="lodka": 1 a$="lawka": 1 a$="larisa": 1 a$="lap{a": 1 a$="lampa": 1 a$="ku~a": 1 a$="kurica": 1 a$="krysa": 1 a$="korowa": 1 a$="komp^qter ukasywaet na otcutCT- wie operatora pocle nomera ctro-ki. ctroka c ovibko' mojet byt^ uctranena ili otkorrektirowana": 1 a$="kazak": 1 a$="kafe": 1 a$="izba": 1 a$="iwan": 1 a$="iskra": 1 a$="inna": 1 a$="igra": 1 a$="igla": 1 a$="i hicla.": 1 a$="hwost": 1 a$="hrap": 1 a$="hicla w ctroke 10 opredel_qt nahal^noe i konehnoe snahenie peremenno' zikla": 1 a$="gorka": 1 a$="garav": 1 a$="firma": 1 a$="fara": 1 a$="cirk": 1 a$="cimwoly, saklqhennye w kawyhki": 1 a$="cimwoly udal_qtc_ is ctroki di- rektiwo' DELETE. dl_ ee wysowa cleduet najat^ odnowremenno CAPSSHIFT i 0. poprobu'te ismenit^ nomer ctroki na 25-'": 1 a$="cifra": 1 a$="azbuka": 1 a$="arka": 1 a$="anvela": 1 a$="ananas": 1 a$="akula": 1 a$="afi{a": 1 a$="`bka": 1 a$=" ctroka, na kotoruq ukasywa-et programmny' kurcor ~>~, sa- n_la mecto naxodiwve'c_ tam ovi-bohno nabrano'. ecli wyswanna_ ctroka w redaktirowanii ne nuj- daetc_, mojno ohictit^ nijnqq hact^ @krana klawive' ENTER": 1 a ";m$(m)( 1 `arbuz C 1 _______ __ 1 _ARBUZ B 1 [ENTER]-No/Yes 1 Za 60 {agow. 1 ZAGRUZKA WTOROJ ~ASTI " 1 Z$="~to |to za bukwa ?": 1 Z$="|to bukwa "+ 1 Z$="wyberi nuvnu` bukwu": 1 Z$="w labirintE slow": 1 Z$="sostAwx slowo": 1 Z$="slowo: 1 Z$="prawilxno , "+b$+" !!!": 1 Z$="bukwy alfawita": 1 Z$="awtor a.s.mednonogow": 1 Z$="] ]": 1 Z$="COPuRIGHT 1992": 1 Z$=" pPawilxno , "+W$(R)( 1 Ynvar| Fevral| Mart Aprel| Ma 1 Y$="aboe%iqvu~|hwgdtzck{nlmpsr`}yf12345": 1 Wypolnenie komand (programm), 1 Wy sklonny boqtxsq budu}ego, sostorovnostx` otnositesx k wliq-ni` drugih. Menx{e podozritelx- nosti i bolx{e nadevdy! Wa{ optimizm horo{, no ne zakry-wajte glaza na nepriqtnosti. W was estx ~to-to ot snegowika. ^uwstwo izq}estwa. Wy mnogo wolnuetesx, i wolneniq priqtny wam. Wa{i standarty wy- soki. Budxte aktiwnee. Horo{aq rabota pomovet wa{ej t}eslawnoj nature. Wy i}ete pokoq i ti{iny. Wy ho- tite o~arowatx kavdogo i po|tomurazwiwajte swoe obaqnie. Wam ne-legko wybiratx. S towari}ami wy nahoditesx w garmonii. Wy slovny, mnitelxny, werite w predrassudki, re{itelxny, no ne wpolne dower~iwy i ne bywaete dowolxny soboj. Wy iskrenne sta-raetesx ulu~{itxsq. Wy l`bite riskowatx: fizi~eski, umstwenno, seksualxno. Wy bystrowozbuvdaetesx, ne nahodite sebe mesta i sli{kom legko sdaetesx. U was legkij harakter! Wy konserwator i ne l`bite pere-men. Wy serxezny, velaete uspe 1 W??????? ? 1 W o p r o s 1 VbasiclesC 1 VUUUj[BMKP 1 VAL ""3.5""=3.5": 1 V$(N)=W$(M) 1 UROK 5 ""re{eniq.cikly. logi~eskie operacii""" 1 UROK 4 ""operatory BEJSIKA""" 1 UROK 3 ""komandy BEJSIKA""" 1 UROK 2 ""osnowy BEJSIKA""" 1 UROK 1 ""klawiatura"" " 1 TRN.DAT DX 1 TO,STEP";: 1 TO OCHOBHA 1 TO TYPE VALUE VERIFY VOLUME YES YOU 1 TECHNOLOGY RESEARCH LTD. 1 TAPE TO DISK COPIER VER 5.0 1 TAPE LOAD ERROR 1 T=1","IF Z=100 1 T=1 INPUT T m 1 T=1 0F Z=100 1 Swobodno>> 1 Stertyh>>>>>>>> 1 SYMBOL SHIFT ";: 1 START TAPE 1 START LINE: 1 SREDSTWO OB]ENIQ MEVDU L@DXMI. 1 SQR 4=2.": 1 SPACE TO NEW DISK 1 S$="20 PRINT ~urok 1~": 1 Razme~ennaq tetradx. 1 RUS.DAT DX 1 REWIND TAPE 1 REM Lena": 1 RAMRET=9890 1 Q$+"YYYYYYYYYYY"+R$+"]"+Q$+"YYYYYYYYYYY"+R$+"]"+Q$+"YYYYYYY"+R$+"]",Q$+"Y"+R$+"[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[_" 1 Q$+"YYYYY"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"YYYYY"+R$+"]"+Q$+"Y"+R$+"[[[_"+Q$+"Y"+R$+"]"+Q$+"YYYY"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]",Q$+"Y"+R$+"]"+Q$+"Y"+R$+"Z[_"+Q$+"YYY"+R$+"Z[\"+Q$+"Y"+R$+"]"+Q$+"YYYYYY"+R$+"]"+Q$+"YY"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"YYY"+R$+"]"+Q$+"Y"+R$+"]" 1 Q$+"Y"+R$+"^[_"+Q$+"YYY"+R$+"[[_"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"^[[[[[[_"+Q$+"YY"+R$+"]"+Q$+"Y"+R$+"^[[[_"+Q$+"Y"+R$+"]" 1 Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"YYY"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"YYY"+R$+"^_"+Q$+"Y"+R$+"]"+Q$+"YYYY"+R$+"]"+Q$+"YYY"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]",Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"^[_"+Q$+"Y"+R$+"]"+Q$+"YYYY"+R$+"]"+Q$+"Y"+R$+"Z[[_"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]"+Q$+"Y"+R$+"]" 1 Q$+"Y"+R$+"[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[\",Q$+"YYYYYYYYYYYYYYYYYYYYYYYYYYYYYYY"+R$+"]",Q$+"Y"+R$+"Z[\"+Q$+"Y"+R$+"Z[[[\"+Q$+"Y"+R$+"Z[[[[[[[[[[[[[[[[[\"+Q$+"Y"+R$+"]" 1 Pods~itywaet koli~estwo bukw w 1 Perehod k operatoru s nomerom 1 PRINT LEN ""ROOM"" ";: 1 PRINT 26+48";: 1 PRINT 10": 1 PRINT 0.5+1E9": 1 PRINT 0.5*1E9": 1 PRINT 0,5/1E8": 1 PRINT 0,5*1E9": 1 PRINT '";: 1 PREWOSHODNO OTLI^NO HORO[O SREDNENXKO SLABOWATO NE GODITSQ NE WERNO 1 PREWOSHODNO OTLI^NO HORO[O SREDNENXKO SLABOWATO NE GODITSQ NE PRAWILXNO d 1 PRESS [BREAK] TO STOP 1 Operator priswaiwaniq, funkciq 1 One Del file 1 OSNRAM=9910 1 Nuvno projti w kabinet 2. 1 NOT ENOUGH MEMORY 1 NO EXE FILES ! 1 NBASICLESB 1 N+" MASTER SOFT": 1 MOVATTR=9700 1 MEHTOM HA3 1 MAT=MAT-32 1 MAT=MAT+32 1 MARK=MARK-1 1 LQ-.0130125 1 LOADER OF RUS FONT & INFO 1 LET A$=STR$100";: 1 LET A$=""100""": 1 LEN)+" !!! ": 1 L(V): GO TO 18": 1 KAK ~hiclowo' peremenno' ~N~ pricwoit^ snahenie 10~": 1 K(V): GO TO 18": 1 JemminiCOMMANDER V4.0 1 Insert command 1 Input FILTER name 1 INT 3.9=3 ";: 1 INT -3.9=-4": 1 INICIALIZATION 1 INIATTR=9870 1 IF A=0 OR B=0 THEN GO TO 20": 1 IF A=0 OR B=0 GO TO 20": 1 IF A=0 AND B=0 THEN GO TO 20": 1 IF A=0 AND B=0 GO TO 20": 1 I8.FAV Bn+ 1 I7.FAV Bt( 1 I14.FAV B\% 1 I13.FAV B8- 1 I1.FAV B` 1 H$=B$(XAT-16 1 GRAPHICS (CAPS SHIFT";: 1 GO TO 20,IF A=0 OR B=0": 1 GO TO 10": 1 Fajlow>>>>>>>>> 1 F$="10 PRINT ~ZX BASIC~": 1 Error catalog! 1 ENG.DAT DX 1 EDLdEDHUUUUW34 1 E$(S);"[ ";: 1 Don't read another's program! 1 Df&;WffKF,2b 1 DRAW X,Y,A ": 1 DIU0GAX5I9L64BTKYBM3425990J3KL2C7TKWD62B1V6J9UAR9G 1 DEMONSTATION 1 DATA TYPE: 1 DATA ARRAY 1 D(point)=curs-4 1 D(point)=0 1 D(cur1)<0.5 1 D$="zikly": 1 D$="wwedite snahenie ~a~": 1 D$="wwedite snahenie A$": 1 D$="wwedite macciw (ot 0 do 99)": 1 D$="wwedite RESTORE": 1 D$="wwedite INPUT": 1 D$="urok 6": 1 D$="urok 4": 1 D$="urok 3": 1 D$="programmy na _syke BASIC": 1 D$="podprogrammy": 1 D$="perexody": 1 D$="operatory zweta": 1 D$="operator 10.": 1 D$="najmite zifru 5": 1 D$="najmite ENteR": 1 D$="najmite EDIT": 1 D$="najmite DELETE": 1 D$="najmite CAPS+8": 1 D$="najmite CAPS+7": 1 D$="najmite CAPS+6": 1 D$="najmite CAPS+5": 1 D$="najmite CAPS+1": 1 D$="nabor, redaktirowanie i sapuck": 1 D$="naberite 25 ": 1 D$="macciwy - odin is naibolee": 1 D$="macciw: ": 1 D$="konez uroka-2": 1 D$="komp^qterna_": 1 D$="grafika": 1 D$="cpicok data:": 1 D$="clojenie": 1 D$="clojenie 40+50=90": 1 D$="clojenie 10+20=30": 1 D$="^toby powtoritx nekotorye ope-"+ 1 D$="^toby izmenitx posledowatelxnoe"+ 1 D$="^toby otli~itx ee ot drugih"+ 1 D$="^islo 8.": 1 D$="^islo 5: 5-->0 stalo 5.": 1 D$="^islo 10.": 1 D$="^etnye |lementy w programme ne"+ 1 D$="\to ne racionalxno.": 1 D$="\to zawisit ot srednego balla"+ 1 D$="\lement H(6) w programme ne wy-"+ 1 D$="\WM 'ne znaet', kak wy~islqtx"+ 1 D$="Zna~enie w q~ejke H uweli~iwa-"+ 1 D$="Zdesx data sozdaniq: 15 qnwarq"+ 1 D$="Zapi{etsq 1.": 1 D$="Zapi{etsq 0.": 1 D$="Zapisx i wosprojzwedenie.": 1 D$="Zapisatx |tu informaci` na disk": 1 D$="Zapisatx na disk.": 1 D$="Za 60 {agow.": 1 D$="Za 30 i 20 {agow sootwetstwenno": 1 D$="Za 15 {agow.": 1 D$="XT N": 1 D$="Wy~islqet celu` ~astx ~isla.": 1 D$="Wy~islqet i priswaiwaet 'K'"+ 1 D$="Wypolnenie komand (programm),"+ 1 D$="Wyhodit iz budki.": 1 D$="Wybratx iz A$ bukwy s 4 po 6.": 1 D$="Wse.": 1 D$="Wremq sutok.": 1 D$="Wremq dlq sistemnyh ~asow wwo-"+ 1 D$="Wozmovnastqmi.": 1 D$="Wariant Bejsika \WM SEWER.": 1 D$="Wariant Bejsika DWK.": 1 D$="W rezulxtate realxnogo razli~iq"+ 1 D$="W prawoj-staroe, w lewoj-nowoe.": 1 D$="W perwom operatore fajl otkry-"+ 1 D$="W li~nom garave odin boks dlq"+ 1 D$="W l`boj moment.": 1 D$="W kataloge.": 1 D$="W bloke pamqti.": 1 D$="W kataloge diska (oglawlenii,"+ 1 D$="Uznaet u sistemy.": 1 D$="UNITED-STATES": 1 D$="Tri raza.": 1 D$="Tolxko dlq u~ebnyh celej.": 1 D$="Teletajp.": 1 D$="TYPE": 1 D$="TYPE MX0:RODIN.TXT": 1 D$="TRON": 1 D$="TO RENAME": 1 D$="TO NAME": 1 D$="TELETYPE": 1 D$="S~ital w q~ejku A$ sledu`}ij"+ 1 D$="Sostoqnie ovidaniq.": 1 D$="Soob}it adresa defektnyh blokow": 1 D$="Soob]aet o nazwanii (imeni)"+ 1 D$="Sledu`]ij po o~eredi.": 1 D$="Sdelatx trafaret |togo izobra-"+ 1 D$="Sdelatx dlq |togo swo` funkci`.": 1 D$="SYSTEM": 1 D$="START=100": 1 D$="SREDSTWO OB]ENIQ MEVDU L@DXMI.": 1 D$="SIMWOLY ODINAKOWY": 1 D$="SIMWOLY NE ODINAKOWY": 1 D$="S samogo na~ala.": 1 D$="S kotoroj proishodila zagruzka.": 1 D$="S 27-j po 40.": 1 D$="Raznosti ob'emow |tih sfer.": 1 D$="Razme~ennaq tetradx.": 1 D$="Razmetka diskety.": 1 D$="RUN, satem ENTER": 1 D$="RODIN.TXT ELSA.TXT": 1 D$="ROBIN.DAT": 1 D$="ROBERT.COM SCOONS.COM": 1 D$="REX.BAS": 1 D$="REN MX0:REX1.BAS MX0:REX2.BAS": 1 D$="Programmy operacionnoj sistemy.": 1 D$="Programma nikogda ne zakon~it"+ 1 D$="Priswaiwaet H zna~enie H+1, to"+ 1 D$="Prikazywaet \WM na~atx wypolne-"+ 1 D$="Pri K=1.": 1 D$="Predstawlqet ~islo tipom 'stro-"+ 1 D$="Prakti~eski net.": 1 D$="Powtorqtx operatory, na~inaq s"+ 1 D$="Potomu, ~to w pamqti \WM dlq H"+ 1 D$="Potomu ~to w operatore s metkoj"+ 1 D$="Potomu ~to net funkcii wozwede-"+ 1 D$="Potomu ~to dlq massiwa (nabora)"+ 1 D$="Pods~itywaet koli~estwo bukw w"+ 1 D$="Po nazwani` fakulxtetow.": 1 D$="Po imeni.": 1 D$="Perehod k operatoru s metkoj 2.": 1 D$="Perehod k operatoru s nomerom"+ 1 D$="PROBA": 1 D$="PRINTER": 1 D$="PRINT ~MASTER COMPUTER~": 1 D$="PRINT MX0:RITA.BAS": 1 D$="PRIKAZ WYPOLNITX KONKRETNOE"+ 1 D$="PORQDOK, POSLEDOWATELXNOSTX "+ 1 D$="PONEDELXNIK": 1 D$="POJAS2": 1 D$="PLOT,DRAW,CIRCLE": 1 D$="PLOT": 1 D$="PETROWA": 1 D$="PAROWOZ": 1 D$="Ot ~eloweka, kotoryj naberet na"+ 1 D$="Ot operatorow s metkami 2, 3, 5": 1 D$="Opisanie funkcii, kak ee wypol-"+ 1 D$="Operatory s nomerami 5 i 6.": 1 D$="Operatory s 3 po 7-j.": 1 D$="Operatory 5 i 6.": 1 D$="Operatory 3, 4, 5.": 1 D$="Operator s metkoj 5.": 1 D$="Operator priswaiwaniq, funkciq"+ 1 D$="Operator 6 otpe~ataet ~islo iz"+ 1 D$="Ono sterto, uni~toveno, zame{a-"+ 1 D$="Ono budet sterto, uni~toveno:"+ 1 D$="Odnu q~ejku.": 1 D$="Ob}ee koli~estwo detej u sot-"+ 1 D$="Oby~no odnu q~ejku.": 1 D$="Oby~no ne sowpadaet.": 1 D$="Ob'em tela na udelxnyj wes ma-"+ 1 D$="Ob |tom nuvno uznatx na str. 13"+ 1 D$="Nuvno projti w kabinet 2.": 1 D$="Nomer 2- na~alu bega."+ 1 D$="Ni~em.": 1 D$="Nikogda.": 1 D$="Net, po porqdku, uporqdo~enno.": 1 D$="Net, nelxzq.": 1 D$="Neograni~ennoe koli~estwo ~isel": 1 D$="Neobhodimo prosmotretx ukaza-"+ 1 D$="Neobhodim priem, ~toby umenx-"+ 1 D$="Ne menee 4-h operatorow.": 1 D$="Ne izwestno.": 1 D$="Nabratx na klawiature i navatx"+ 1 D$="Na takoj disk informaciq dave"+ 1 D$="Na swoem, s kotorogo on zagru-"+ 1 D$="Na operatore 16.": 1 D$="Na displej.": 1 D$="Na diskete.": 1 D$="Na diskete fajlow ne budet." 1 D$="NEXT": 1 D$="NAME": 1 D$="N+2: perexod k stroke 10": 1 D$="N+2: perexod k ctroke 10": 1 D$="Mevdu operatorami s metkami"+ 1 D$="Ma[ina movet ego nape~atatx.": 1 D$="MX1:PROST.DAT"+ 1 D$="MX1:PROBA.BAS"+ 1 D$="MX1:": 1 D$="MASTER": 1 D$="MASTER COMPUTER": 1 D$="MART.DAT": 1 D$="L`boj simwol.": 1 D$="LISA.DAT LISA.BAS": 1 D$="LETO.DAT": 1 D$="LETO": 1 D$="LET M=12-N": 1 D$="LET HE WRITE": 1 D$="Kopirowanie programmy WOOT.": 1 D$="Kopirowanie operacionnoj siste-"+ 1 D$="Kone~no, net.": 1 D$="Kolxcewoj, krugowoj.": 1 D$="KROT01.COM KROT02.COM": 1 D$="KROSSWORD": 1 D$="KOMANDY, PRIKAZY.": 1 D$="K staromu sodervimomu q~ejki H"+ 1 D$="K H w prawoj ~asti rawenstwa,"+ 1 D$="Iz matemati~eskogo predstawle-"+ 1 D$="Iniciirowatx fajl oglawleniq.": 1 D$="Inicializaciq oglawleniq.": 1 D$="Imq fajla.": 1 D$="IZ POSLEDOWATELXNOSTI KOMAND.": 1 D$="INVERSE 0": 1 D$="INPUT K": 1 D$="INK,PAPER,OVER": 1 D$="IMQ=BORIS": 1 D$="GO TO SUBROUTINE": 1 D$="GLAGOL": 1 D$="FLASH,INVERSE": 1 D$="FEWRALX": 1 D$="FEVR.DAT": 1 D$="Esli on probevt 10 krugow, zna-"+ 1 D$="Esli A<W, to perejti na opera-"+ 1 D$="E, F.": 1 D$="E OUT OF DATA, 20:1": 1 D$="Dwa rekwizita: ob'ekt-'Telefon"+ 1 D$="Dwa operatora priswaiwaniq i"+ 1 D$="Do wykl`~eniq ma{iny ili smeny"+ 1 D$="Dlq wywoda na disk.": 1 D$="Dlq wwoda.": 1 D$="Dlq togo, ~toby po nomeru (met-"+ 1 D$="Dlq togo, ~toby izmenitx posle-"+ 1 D$="Dlq togo, ~toby bystro najti"+ 1 D$="Dlq opisaniq sposoba wy~isleniq"+ 1 D$="Dlq obnuleniq q~ejki U.": 1 D$="Dlq hraneniq mnogih ~isel pod"+ 1 D$="Dlq |togo nuvno prosmotretx"+ 1 D$="Datu wwodit programmist.": 1 D$="Dannye tipa 'slowo', 'cepo~ka"+ 1 D$="Da, budet.": 1 D$="DRAW": 1 D$="DLQ OB]ENIQ MEVDU ^ELOWEKOM"+ 1 D$="DIR MX1:*.DAT": 1 D$="DELETE THE SYMBOL Z.": 1 D$="Celyj tip sodervimogo q~ejki K%.": 1 D$="COPY/SYS MX0:*.* MX1:": 1 D$="COPY": 1 D$="COPY MX1:*.DAT MX0:": 1 D$="Bukwennyj(simwolxnyj) tip soder-"+ 1 D$="Budet pe~atatxsq menx{ee iz"+ 1 D$="Blagodarq |lektronno-lu~ewoj"+ 1 D$="Begu na meste.": 1 D$="BRIGHT 0": 1 D$="BORDER,BRIGHT": 1 D$="Auditoriq 6": 1 D$="A1- 20 ~isel, W1- 3 ~isla.": 1 D$="A- 10 ~isel, W- 9 ~isel.": 1 D$="A CLOCK": 1 D$="A B": 1 D$="9 STOP STATEMENT, 30:1": 1 D$="9 STOP STATEMENT, 10:2": 1 D$="9 PRINT #1,F$,D$": 1 D$="9 GO TO 17": 1 D$="8 ~isel i 1 ~islo. Predydu}ie 7"+ 1 D$="8 imen.": 1 D$="7 KNIG": 1 D$="7 9": 1 D$="64, t.e. poslednee ~islo.": 1 D$="60>RECTORE: GO TO 10": 1 D$="60>GO TO 20": 1 D$="60 delenij.": 1 D$="6, 7 i 8.": 1 D$="6 LET Z=X(3)+X(4)": 1 D$="6 LET M= 1 D$="6 IF X<8 THEN GOTO 4": 1 D$="6 GO TO M": 1 D$="50 DATA ~clojenie~,10,20,40,50": 1 D$="5 w stepeni 5 rawno 3125": 1 D$="5 raz.": 1 D$="5 i 8": 1 D$="5 LET D= 1 D$="5 IF X<8 THEN GOTO 3": 1 D$="5 IF X<10 THEN GOTO 3": 1 D$="5 GO SUB 10": 1 D$="40,40": 1 D$="40*6*2=480 blokow.": 1 D$="40 PRINT A$;~ ~;A;~+~;B;~=~;A+B": 1 D$="4) Pe~atatx H": 1 D$="4 ~isla.": 1 D$="4 STOP": 1 D$="4 Operatora 6 Operatorow": 1 D$="4 LET C$=A$+B$": 1 D$="4 KNIGI": 1 D$="4 4 8": 1 D$="30>PRINT ~INVERSE 1~": 1 D$="30>PRINT AT 10,10;~1234~": 1 D$="30>PRINT AT 0,0;~MASTER~": 1 D$="30>PRINT A(1);~ ~;A(2);~ ~;A(3": 1 D$="300 delenij.": 1 D$="30 READ B": 1 D$="3 rublq.": 1 D$="3 i 2.": 1 D$="3 PRINT K": 1 D$="3 PRINT A$(3)": 1 D$="3 LET Z=Z+2": 1 D$="3 LET Y= 1 D$="3 LET X=X+3": 1 D$="3 LET X=X+2": 1 D$="3 LET X=8": 1 D$="3 LET K=1": 1 D$="3 4 3 4 5": 1 D$="25>PRINT ~urok 1~": 1 D$="20>PRINT ~START=~;START": 1 D$="20>PRINT AT N,10;A$": 1 D$="20>PRINT A: PRINT A$": 1 D$="20>PRINT A$;~-~;2": 1 D$="20>BRIGHT 1: PRINT ~BRIGHT 1~": 1 D$="20 ~isel, ot 1 do 20.": 1 D$="20 READ A": 1 D$="20 PAUSE 100: OVER 1": 1 D$="20 PAUSE 100: FLASH 0": 1 D$="20 INVERSE 1": 1 D$="20 FOR N=1 TO 5: INPUT A(N):NE": 1 D$="20 ~MASTER COMPUTER~": 1 D$="20 10": 1 D$="2 rublq.": 1 D$="2 LET X=10": 1 D$="2 LET K=1+5": 1 D$="2 FOR K=2 TO 8 STEP 2": 1 D$="2 FOR K=1 TO 20 STEP 1": 1 D$="2 DIM F$(10)"+ 1 D$="2 2 2": 1 D$="1994 operatora: 997 operatorow"+ 1 D$="17 LET W= 1 D$="17 LET C=A/B: RETURN": 1 D$="17 LET C=1/( 1 D$="16 LET W= 1 D$="16 LET C=A*B: RETUTN": 1 D$="16 LET C= 1 D$="15 {agow.": 1 D$="15 marta 1989 g.": 1 D$="15 LET W= 1 D$="15 LET C=A-B: RETURN": 1 D$="15 LET C= 1 D$="14 LET C=A+B: RETURN": 1 D$="14 LET C= 1 D$="11 ~asow 35 minut 45 sekund.": 1 D$="100 operatorow cikla.": 1 D$="100 indiwidualxnym garavam.": 1 D$="100 i 5000": 1 D$="10 zna~enij.": 1 D$="10 ^isel.": 1 D$="10 READ A$": 1 D$="10 PRINT ~INVERSE 0~": 1 D$="10 PRINT AT 10,10;~OVER~": 1 D$="10 PAPER 0: FOR N=0 TO 7: INK N": 1 D$="10 LET START=100": 1 D$="10 LET A$=~konez uroka~": 1 D$="10 LET A$=~ZX BASIC~:LET N=10": 1 D$="10 INPUT A: INPUT A$": 1 D$="10 INK 0: FOR N=0 TO 7: PAPER N": 1 D$="10 FLASH 1: PRINT ~MASTER~": 1 D$="10 DIM A(5)": 1 D$="10 BRIGHT 0:PRINT ~BRIGHT 0~": 1 D$="1-ZIMA": 1 D$="1-J WES = 13.16 KG": 1 D$="1, 5, 32.": 1 D$="1, 2, 3, 4, 5, 6, 7, 8, 9, 10.": 1 D$="1 ~islo.": 1 D$="1 zna~enie.": 1 D$="1 zapisx.": 1 D$="1 6 7": 1 D$="1 3 6": 1 D$="1 3 5 1 4 7": 1 D$="1 2 3.": 1 D$="1 2 3": 1 D$="1 2 3 4": 1 D$="1 2 3": 1 D$="0 OK, 40:1": 1 D$="0 OK, 0:1": 1 D$="0 6 0.3": 1 D$="-40,-40,2": 1 D$=");~ ~;A(4);~ ~;A(5)": 1 D$="'Wyrezaet' podstroku w stroke"+ 1 D$="'Skleiwaet' cepo~ki (stroki)"+ 1 D$=" wwedite PRINT": 1 D$=" wwedite NEXT ": 1 D$=" wwedite LET ": 1 D$=" o v i b k a ! ": 1 D$=" najmite NEXT ": 1 D$=" 5 6 7": 1 D$=" wwedite ~$~ ": 1 D$=" wwedite to ": 1 D$=" wwedite FOR ": 1 D$=" najmite RUN ": 1 D$=" 5 7": 1 D$=" BORDER 0 ": 1 D$=" BORDER "+ 1 D$=" ": 1 D$=" ": 1 D$=" ": 1 CONVER-Utility npeqcma 1 CONTINUE": 1 COMPLETE A WORD 1 CODE LENGTH: 1 CAPS SHIFT+SYMBOL SHIFT";: 1 CAPS SHIFT+SPASE": 1 CAPS SHIFT+6,CAPS SHIFT+7": 1 CAPS SHIFT , SIMBOL SHIFT": 1 CAPS SHIFT + SIMBOL SHIFT";: 1 CAPS SHIFT + 8";: 1 CAPS SHIFT + 5": 1 CAPS SHIFT 1 CAPS LOCK( CAPS SHIFT + 2)";: 1 C W E T A . G R F I K A ": 1 BEEEEFFFFFGGGGGBBBBDDDD0 1 BEEEBFFFFFGGGGGBBBBDDDD0 1 BBEEEFFFFFGGGGGBBBBDDDD0 1 BBEEEBFFFBGGGGGBBBBDDDD0 1 BBBBBFFFFFBBBBBBBBBDDDD0 1 BBBBBFFFFFBBBBBBBBBBBBB0 1 BBB8888888888888888 1 BASIC LENGTH: 1 B$(Z)=W$(R,Q): 1 APA,OTCEKAEMA 1 AMETPA AC,": 1 ABS -3.2=ABS 3.2=3.2": 1 ABEST D C 1 ABEST * Bh 1 A:RETURN": 1 A,C1,L ";: 1 A): RETURN": 1 A$="zwet fona opredel_et operator PAPER (~bumaga~)": 1 A$="wyswanna_ ili nabranna_ c klawi-atury ctroka mojet byt^ otkor- rektirowana pri pomo`i ctrohno- go kurcora i direktiwy DELETE. "+ 1 A$="w programme ctroki 20 i 25 odi- nakowogo coderjani_. dl_ togo, htoby ubrat^ lqbuq is nix, do- ctatohno nabrat^ ee nomer i na- jat^ ENTER": 1 A$="tip peremennyx i rasmernoct^ macciwa opredel_qtc_ operatorom DIM. dl_ hiclowyx peremennyx w ckobkax ukasywaetc_ kolihectwo @lementow macciwa, a dl_ cim- wol^nyx - takje dlinu kajdo' pe-remenno'": 1 A$="teku`a_ posizi_ grafiki": 1 A$="teku`a_ grafihecka_ posizi_": 1 A$="takim obrasom, wyrajenie LET A$=~ZX BASIC~ mojno perewecti kak ~cimwol^no' peremenno' ~a~ pri- cwoit^ snahenie ~ZX BASIC~~, a wyrajenie 1 A$="sa operatorom FOR cleduet hiclo-wa_ peremenna_ (w dannom cluhae ~N~). ona imenuetc_ peremenno' zikla.": 1 A$="pri nabore ctroki c klawiatury ona rasme`aetc_ w nijne' hacti @krana wideomonitora": 1 A$="polny' perehen^ operatorow i funkzi' _syka dan w opicanii k komp^qteru, po@tomu my snakomim wac tol^ko c ocnownymi is nix.": 1 A$="peremenna_ - odna ili neckol^ko bukw, kotoro' operatorom LET pricwoeno kakoe-libo snahenie. ono mojet ismen_t^c_ w xode wy- polneni_ programmy.": 1 A$="operator ~PLOT~ okraviwaet zwe- tom tona odnu tohku @krana (ime-nuetc_ ~pikcel^~) i uctanawliwa-et teku`uq posiziq wywoda grafi-ki na @kran.": 1 A$="operator ~DRAW~ prowodit liniq is teku`e' grafihecko' posizii. on mojet imet^ kak dwa, tak i tri argumenta.": 1 A$="operator ~CIRCLE~ ricuet na @k- rane krug, zentr kotorogo po oc_m ~X~ i ~Y~ opredel_qt per- wye dwa argumenta, a radiuc - treti' argument": 1 A$="operator oVeR c argumentom ~1~ poswol_et nanocit^ tekct powerx ranee wywedennogo na @kran": 1 A$="operator INk (~hernila~) opre- del_et zwet tekcta ili grafiki": 1 A$="operator INVERSE c argumentom ~1~ men_et mectami zweta fona (~bumagi~) i tona (~hernil~)": 1 A$="operator FLASH uctanawliwaet re-jim merzani_ tekcta. argument 1 osnahaet, hto merzanie uctanow- leno, o - cbroveno": 1 A$="operator BRIGHT C argumentom ~1~uctanawliwaet powyvennoe cwehe- nie @krana": 1 A$="nomerom": 1 A$="kolihectwo": 1 A$="kak widno, ctroka bes nomera wy-polnena komp^qterom kak direkti-wa crasu je pocle najati_ ENTER i w programmu ne wnecena. ctroki, coderja`ie ne cootwet- ctwuq`ie _syku wyrajeni_, w pro-grammu ne wnoc_tc_ i ne wypoln_-qtc_. pri @tom komp^qter ukasy- waet ovibku migaq`im kurcorom ~?~.": 1 A$="kak widno, clowo ~START~, nab- rannoe w kawyhkax, wywedeno na @kran, a ~START~ bes kawyhek in-terpretirowano kak hiclowa_ pe- remenna_ i wywedeno ego snahenie(100)": 1 A$="imenem": 1 A$="hiclowa_ peremenna_ mojet cocto-_t^ i is neckol^kix bukw. htoby otlihit^ hiclowye peremennye ot cimwolow i ix ctrok, poclednie saklqhaqtc_ w kawyhki.": 1 A$="gruppy dannyx mogut formirowat^-c_ i w wide macciwa. macciw - @to gruppa peremennyx c odnim imenem, otlihaq`iec_ drug ot druga por_dkowym nomerom.": 1 A$="ecli pocle INPUT ctoit im_ cim- wol^no' peremenno', to mojet byt^ nabrano lqboe cohetanie bukw i zifr. ecli je peremenna_ hiclowa_, to mojno nabirat^ tol^ko zifry, libo bukwy, coot- wetctwuq`ie imeni hiclowo' pere-menno', kotoro' snahenie uje pricwoeno": 1 A$="ecli net, to pribawl_et k nemu hiclo, uctanowlennoe clujebnym clowom 1 A$="ecli N rawno ili bol^ve predel^-nogo snaheni_, to wypoln_etc_ cleduq`a_ sa ziklom ctroka, libo(ecli zikl sawervaet programmu) wydaetc_ coob`enie ~0 ok~": 1 A$="dl_ peredwijeni_ ctrohnogo kur- cora wlewo cleduet odnowremenno najat^ CAPS SHIFT i 5, wprawo - CAPS SHIFT i 8": 1 A$="dl_ neodnokratnogo wypolneni_ opredelenno' operazii icpol^su- qtc_ operatory zikla FOR...TO - NEXT.": 1 A$="dl_ nabora hiclowyx peremennyx icpol^su'te tol^ko zifry": 1 A$="ctroki programmy nahinaqtc_ c nomera": 1 A$="ctroka, ne coderja`a_ cintakci- heckix ovibok, pocle najati_ klawivi ENTER sanocitc_ komp^q- terom w programmu i otobrajaetc_w werxne' hacti @krana": 1 A$="ctroka w nijne' hacti @krana - coob`enie komp^qtera o wypolne- nii direktiwy, coderja`e'c_ w perwom operatore ctroki 0. poc- le @togo dl_ wywoda programmy na@kran nujno najat^ ENTER": 1 A$="coob`enie E OUT OF DATA, 20:1osnahaet, hto cpicok DATA oko-nhilc_. dl_ prodoljeni_ raboty programmy nujno libo dopolnit^ ego, libo ismenit^ stroku 60,do-polniw ee operatorom ~RESTORE~." 1 A$="chitywanie dannyx proiswoditc_ pocledowatel^no iso wcex cpickowDATA, racpolojennyx w programme.cama je ctroka DATA programmo' ne wypoln_etc_.": 1 A$="c klawiatury mojno nabrat^ ctro-ki c nomerami ot 1 do 9999, in- terwal mejdu nomerami ctrok op- redel_et pol^sowatel^. kak pra- wilo, @tot interwal bol^ve 1,htoposwol_et wpocledctwii wnocit^ nowye ctroki. ctroka, nabranna_ bes nomera, chitaetc_ nolewo' i wypoln_etc_ komp^qterom nemed- lenno.": 1 A$="b=R, 1 A$="argumentami @togo operatora _w- l_etc_ polojenie pikcel_ po oc_m~x~ (makcimal^noe snahenie 256) i ~Y~(makcimal^noe snahenie 175) ": 1 A$="OTPE3KOB AB 1 A$="I"+A$+".FAV" 1 A$="HEKOTOPO 1 A$=" programmny' kurcor naxodit- c_ w ctroke, wwedenno' w prog- rammu pocledne', no mojet byt^ pereme`en wwerx (odnowremennoe najatie CAPS SHIFT i 7) i wnis (CAPS+6)"+ 1 A$=" zwet ~0~(herny') wnow^ ne widen is-sa cowpadeni_ ~bumagi~ i ~hernil~ ": 1 A$=" tekct c zwetom ~hernil~=0 ne wi-den, tak kak on cowpadaet c zwe-tom fona ": 1 A$(A)=A$(A-1 1 A$(A)=A$(A+1 1 @@@A@B@C@D@E@F@G`@`A`B`C`D`E`F`G 1 ?bior7 CX 1 ?BIORITM7Bx 1 ???????? ? 1 >bior.2 C@ 1 =bior.1 C 1 =BIORITM Bb 1 ==8888888888888===8888888 1 ;t;".";m;".";j;" " 1 ;n$,m$(m)( 1 ;N;"-WOPROS" 1 ;,,,,,,,,,,,,: 1 ;,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,: 1 ;"wwedite operator";B$ 1 ;"u tebq: 1 ;"peterburg" 1 ;"ovibka!": 1 ;"otwet prawilxnyj?" 1 ;"najdi slowo ": 1 ;"nahal^noe": 1 ;"nahal^noe" 1 ;"intelektual|n{ 1 ;"e}@ stranica": 1 ;"^[[[[[[[[_": 1 ;"[OPEN] OUTPUT ";: 1 ;"[OPEN] INPUT ";: 1 ;"Z[[[[[[[[\"; 1 ;"ZAPUSK \KRANNOGO REDAKTORA": 1 ;"ZAMENA.": 1 ;"Z> - ";: 1 ;"Wyhod w glawnoe men`.": 1 ;"Wyhod w glawnoe men`." 1 ;"Wyhod iz redaktora" 1 ;"Wy uwereny ?": 1 ;"Wwodite stroku" 1 ;"Wwedite ~islo po Wa{emu wyboru. "; 1 ;"Wwedite zanowo ";N;" stroku " 1 ;"Wwedite simwol-->";: 1 ;"Wwedite nomer-->"; 1 ;"Wwedite nomer uroka-->"; 1 ;"Wwedite nomer komandy-->"; 1 ;"Wwedite fragment teksta" 1 ;"Wwedite bukwu ili ";: 1 ;"Wwedite operator,","komandu ili funk-","ci` izobravennye w","sinem oko{ke." 1 ;"WYHOD IZ REDAKTORA": 1 ;"WWEDITE NOMER FUNKCII--> ": 1 ;"WRITE.": 1 ;"WRITE SELECT": 1 ;"WRITE ";: 1 ;"WOT PRAWILXNYJ OTWET": 1 ;"WNIMANIE!!!": 1 ;"WNIMANIE !": 1 ;"WNIMANIE !" 1 ;"WNIMANIE !!!": 1 ;"W> - ";: 1 ;"V= (R -X )dX=(R X-- )" 1 ;"V = h (R--.h)" 1 ;"USLOWIQ PRIMENENIQ I PUSK PROG-": 1 ;"Tendenciy:"; 1 ;"TAK dervatx !": 1 ;"StarGaser" 1 ;"Simwolow-";51 1 ;"S^ASTLIWO! 1 ;"SLOWARX": 1 ;"SFERY: ": 1 ;"SET SECTION lines": 1 ;"SET SECTION ";: 1 ;"SET PAGE lines": 1 ;"SET PAGE ";: 1 ;"SEKCIJ. ": 1 ;"S> - ";: 1 ;"S(X)= .BD = (OD -OB )": 1 ;"R_E_V_I_M-";W+1 1 ;"RAZMERY BUFEROW": 1 ;"RAS^ETNYE FUNKCII DLQ KRUGA I": 1 ;"RAMMY. ": 1 ;"Q> - ";: 1 ;"Prawoq ~astx" 1 ;"Posle kakoj stoki wstawlqtx" 1 ;"PREDSTAWLQ@T..." 1 ;"POSMOTRITE NA PRAWILXNYJ OTWET": 1 ;"PEREME]ENIE, KOPIROWANIE I PRE-": 1 ;"PEREME]ENIE KURSORA PO STRANI-": 1 ;"PAPER ";i: 1 ;"O{ibo~nyj simwol, POWTORITE.": 1 ;"O{ibok: ";N-R 1 ;"O{ibka. Powtorite wwod-->"; 1 ;"O{ibka wwoda. Powtorite": 1 ;"Oqibka "' 1 ;"OD=R ;OB=X" 1 ;"OBZOR FUNKCIJ": 1 ;"OBRAZOWANIE TEKSTA. ": 1 ;"O.K. (Da/Net) ?" 1 ;"Net spiska. POWTORITE WWOD.": 1 ;"Navmite l`bu` klawi{u" 1 ;"NET BOLX[E PAMQTI": 1 ;"NEMNOVKO PODOVDITE" 1 ;"NE NAJDENO" 1 ;"NAZNA^ENIE.": 1 ;"NAVMITE KLAWI[U WWOD DLQ WYHODA" 1 ;"Lewoq ~astx" 1 ;"Letter-->"; 1 ;"LET HE RUN.": 1 ;"Konec raboty.": 1 ;"Konec programm{ (Da/Net) ?" 1 ;"Kak wy dumaete, Wa{": 1 ;"KOMANDY OPREDELENIQ STRANIC I" 1 ;"KOMANDY OPERATORA.": 1 ;"INCLUDE ";: 1 ;"HELP>.": 1 ;"Great thanks for KVED ltd."; 1 ;"GOLD>.": 1 ;"ESLI PRO^ITALI, NAVMITE WWOD" 1 ;"Dlq prodolveniq navmite klawi{u" 1 ;"Dlq na~ala raboty navmite WWOD": 1 ;"Disk by LagSoft 8.2.94": 1 ;"Dal|qe (Da/Net) ?" 1 ;"DO SWIDANIQ!!!": 1 ;"D-da N-net -->"; 1 ;"Corrected by O.Kozloff & Co" 1 ;"COPY MX1:*.DAT MX0:*.TXT": 1 ;"CAM I SEKCIQM. ": 1 ;"Awtory:" 1 ;"ABTOP OC 1 ;"@mocional|n{ 1 ;"<UNDELLINE> - ";: 1 ;"<UNDELCHAR>- ";: 1 ;"<SUBSTITUTE> - ";: 1 ;"<SU/S> <SU/S> - ";: 1 ;"<SU/S> - ";: 1 ;"<SU/O> - ";: 1 ;"<R\CI>"; 1 ;"<RESET> ";: 1 ;"<REPLACE> - ";: 1 ;"<PASTE> - ";: 1 ;"<LF> - ";: 1 ;"<GOLD>": 1 ;"<DELWORD> - ";: 1 ;"<DELLINE> - ";: 1 ;"<DELLINE> 1 ;"<DELEOL> - ";: 1 ;"<DELCHAR> - ";: 1 ;"<DEL> - ";: 1 ;"<CUT> - ";: 1 ;"<APPEND> - ";: 1 ;"3 PRINT X": 1 ;"2. kempston": 1 ;"16 RETURN ": 1 ;"1234567890123456789012345678901 "( 1 ;"1. klawiatura"; 1 ;"1- nabor redaktirowane i 3apuck"''"2- Operatory LET PRINT INPUT"''"3- zikly podprogrammy perexody"''"4- Operatory 1 ;"--VDITE KONCA ZAGRUZKI--" 1 ;"--NE WERNO--" 1 ;"--NAVMITE NA L@BU@ KLAWI[U--" 1 ;"--KONEC RABOTY-- Wy uwereny?": 1 ;"--------------------------------": 1 ;"**WY PRAWY**": 1 ;"**U^EBNYJ TEKSTOWYJ REDAKTOR**" 1 ;" rezulxtat? ": 1 ;" powtoritx ": 1 ;" Zenit "; 1 ;" Wyhod w glawnoe men`.": 1 ;" Wwedite ~asy (2 cifry) i minuty (2 cifry).": 1 ;" Wwedite geografi~esku` dolgotu mesta rovdeniq w gradusah (3 cifry) i minutah (2 cifry)": 1 ;" Wwedite Wa{e imq.": 1 ;" Wnimanie: wremq rovdeniq dolvnobytx wyraveno po Grinwi~u. U~tite letnij i dekretnyj sdwigwremeni.": 1 ;" Werno: ";R; 1 ;" Prosim ispravit|": 1 ;" Preobl "; 1 ;" NAVMITE NA KLAWI[U WWOD " 1 ;" 1. Raspe~atatx goroskop": 1 ;" --MOVETE NAVATX NA WWOD--" 1 ;" (7:30 wwoditsq kak 0730)" 1 ;" ";C$(N);" " 1 ;" |to "+z$(ll 1 ;" wyhod "; 1 ;" powtoritx ": 1 ;" powtoritx " 1 ;" Wwedite {irotu mesta rovdeniq wgradusah (3 cifry) i minutah (2 cifry)." 1 ;" Wne{nie planety: Uran 1 ;" Sewernaq ili `vnaq?": 1 ;" NAVMITE NA KLAWI[U WWOD " 1 ;" Esli {irota neizwestna, navmite <enter>" 1 ;" ??? "; 1 ;" ??? ": 1 ;" Wwedite wremq rovdeniq": 1 ;" Wwedite mesqc rovdeniq (ciframi)" 1 ;" Wwedite god rovdeniq." 1 ;" Wwedite datu rovdeniq (ciframi)": 1 ;" Wosto~naq ili zapadnaq?": 1 ;" Navmite l`bu` klawi{u... ";: 1 ;" Esli dolgota neizwestna, navmite <enter>" 1 ;" --ZAWER[ENIE RABOTY-- " 1 ;" O{ibka. Powtorite wwod": 1 ;" Navmite l`bu` klawi{u": 1 ;" Konec raboty s kartotekoj": 1 ;" Dannye dlq goroskopa": 1 ;" 1 2 3 4 5 6 7 8 9 0" 1 ;" --GLAWNOE MEN@ K52-- ": 1 ;" ---TRENAVER STROK--- " 1 ;" Navmite l`bu` klawi{u " 1 ;" A A A ": 1 ;" 1 2 3 "( 1 ;" ": 1 ;" WNIMANIE! " 1 ;" MEN@ " 1 ;" ": 1 ;" ": 1 ; dlqobratnogo preobrazowaniq nado razdelitx na 1 ; 1 ; 1 ; 1 ; 1 ; 1 ; 1 :"''"intelekt.:" 1 :"''"@mocional|n{ 1 : 1 94.326675,546.15335,-.000175,.0224925,0,0,75.273925,690.11493,.8141,.00035,326.7034,2.74735,.0006225,4.4481,-.02385,0,574.86805,362.28265,0,.6216,0,0,98.79435,283.80348,0,0,272.3861,3.490025,.000775,42.86695,0,0, 1 90 GO TO 60 100 LET Z=(X+X)/X" 1 8==8888888888888888888888 1 896.1896,89997.625,-.000375,.0418775,-.0001025,0,2.5000003,253.05208,4.29795,.001125,0,0,0,0,0,0,255.69845,373681.29,0,.514035,.00005,0,.967745,71.884375,.9257,.0003,117.86485,2.963,.000425,17.5072,.00465,-.000025,531.50805,146294.5,.003225,.01705,-.0001,0,1.80833,135.96048,1.270475,-.003475,189.44913,2.249625,.00105,8.484075,.0025,0,798.82325,47849.645,.00045,.233275,.00025,0,3.809225,713.5794,2.674425,.000325,121.9661,1.927475,0,4.625825,-.0017,.000025,563.32083,7586.7301,-.0018,.120825,.0004,0,13.006403,683.19385,1.498575,.00175,248.60845,2.52635,.000875,3.27185,-.01424,0,438.66555,3053.8787,-.00125,.139725,-.000875,0,23.886875,845.76943,2.713,.00245,281.97598,2.1829875,-.000375,6.2313,-.0095,-.00005,181.62205,1070.9470,.0002,.11586,.000075,0,48.04535,245.17888,2.464425,-.002675,183.69275,1.246675,.003275,1.93115,.001575,.0001,Q 1 88>>>>88888888888888888888888888 1 88888>>>>>>>>>>>>88 1 88888888888888< 1 8888888888888888888888888888888888888888888888888888888888888888 1 8888888888888888888888888 1 888888888888888888888 1 8888888888888888 1 888888888888888 1 888888888888)**)8** 1 8 ~isel i 1 ~islo. Predydu}ie 7 1 70 GO TO 30" 1 7 Sektor : 2 1 64000,1535 1 60 IF B>A THEN PRINT""";: 1 6 Sektor : 12 1 50 IF B<A THEN PRINT""";: 1 5, operator": 1 5 PRINT SEG$(S$(1),1,6)": 1 4astr.fntC 1 45 Sektor : 1 A18 1 42 Sektor : 1 M12 1 40 PRINT 1,,2": 1 40 IF A=B THEN PRINT";: 1 40 GO TO 30": 1 4 Sektor : 10 1 36 Sektor : 3 p01 1 30 PRINT": 1 30 PRINT X+Y": 1 30 INPUT ";: 1 3","IF C>8 1 3 READ A$": 1 3 LET Z=Z+2 1 3 Sektor : 10 1 3 RETURN NEXT J GO TO 5 INPUT E GO SUB 1000 CLS NEXT R LET B=A IF S<0 1 3 0F C>8 1 26 Sektor : 9 1 20 PRINT 1;2": 1 20 LET Y=34": 1 20 INPUT A:CLS": 1 2.0 = 2 ; 0.23 = .23" 1 2 2 2 1 16384,6912 1 120","IF S<0 1 120 PRINT B CLS RETURN FOR X=3 TO 10 STEP 2 LET X=12 LET A=18 LIST NEXT M STOP LIST PRINT W GO TO 28 GO SUB 2100 PRINT A GO TO 15 LET Z=X IF Z=100 1 120 0F S<0 1 11 Sektor : 5 1 10 REM A=1E-9": 1 10 REM ";: 1 10 PRINT A=1E9": 1 10 PRINT 26+48 ";: 1 10 PRINT 1,2": 1 10 PRINT 0.5*1E9": 1 10 LET X=12": 1 10 LET A=5": 1 10 LET A=1E9": 1 10 LET A=1E-9": 1 10 LET A=1E-10": 1 10 GOSUB 1000 20 LET Y=SIN X/X 30 GOSUB 1000 40 LET Z=(X+X)/X ... 1000 INPUT X 1010 IF X 1 10 FOR J=0 TO 12 20 BEEP 1,J 30 NEXT J": 1 10 FOR I=1 TO 100 20 PRINT I, 30 NEXT I ": 1 10 FOR I=0 TO 100 STEP 2 20 PRINT I 30 NEXT I": 1 10 DEF FN A(X)=X*X": 1 10 DATA 1,2,-5E-1 20 DATA 0 30 DATA -3,5": 1 1 rawno 1. " 1 1 Sektor : 7 1 0p00000000000000000000000000000 1 0P00000000000000000000000000000 1 0ET X=12 0ET A=18 0RINT A 0RINT B 0NPUT E 0NPUT T 0ETURN 0O SUB 1000 0O SUB 2100 0EXT J 0EXT M 0O TO 15 0O TO 28 0TOP 0OR X=3 TO 10 STEP 2 0OR A=1 1 000xxxxxxxxx00xxxxxxxxxxxx0prp0 1 000xxxxxxxxx00xxxxxxxxxxxx0ppp0 1 000qqqqprrrrpppppqqqqqrprrpppp0 1 000qqqqprrrppppppqqqqqrrrppppp0 1 000qqqqpprrrpppppqqqqqrprrpppp0 1 000qqqqpprrrpppppqqqqprprrpppp0 1 000qqqqppppppppppppppprrrrpppp0 1 000pqqqppppppppppppppprrrrpppp0 1 000pppprrrrrpppqqqqqqppppppppp0 1 000pppprrrrppppppppppppppppppp0 1 000pppprrprrppppqqqqqppppppppp0 1 000pppppppppppppppppprrprppppp0 1 000BBBBEEEEEBBBBBGGGGBBBBBDBDD0 1 000BBBBEEEEBBBBBBBBBBBBBBBBBBB0 1 000BBBBEEBEEBBBBBGGGGBBBBBDBDD0 1 000BBBBCCCBBFFFFFBBBBBBBBBBBBB0 1 0000000000000000000000000000000000i0i0i0i0i0i0i0i0i0i0i00XX000000000000000000000000000000XX0000000i0i0i0i0i0i0i0i0i0i0i000000GC000000000000000000000000000000CC000i0i0i0i0i0i0i0i0i0i0i0000000000000000000000000000000000EEEEEEEE 1 0000000000000000000000000000000000M0M0M0M0M0M0M0M0M0M0M00DD000000000000000000000000000000DD0000000M0M0M0M0M0M0M0M0M0M0M000000GC000000000000000000000000000000CC000M0M0M0M0M0M0M0M0M0M0M000000000000000000000000000000000099999999 1 000000000000000000000000000000000000000000000000000000000000000000ppppppppppppppppppppppppppp0 1 000000000000000000000000000000000000000000000000000000000000000000DDDDDDDDBBFFFBBBBBBBBBBBBBB0 1 0,000000001 1 0 THEN RETURN" 1 0 THEN 50 30 PRINT ";: 1 0 THEN 100 80 PRINT ";: 1 /k*y))+769 1 /k*l))-4586.4 1 /k*(l1-y)))+148 1 /k*(l-y))) 1 /k*(l-l1)))-125 1 /k*(l+y))) 1 /k*(l+l1-y)))+192 1 /k*(l+l1)))-55 1 /k*(23.452294 1 /ASTROLOGB 1 .posle |togo w bloke dannyh os-tanetsq ~islo 1 .dlq perewoda iz gradusow w radi-any neobhodimo ~islo razdelitx na 180 i umnovitx ego na 1 ... THEN w podprogramme prower_et ictin- noct^ utwerjdeni_ ~N bol^ve 10~. ecli utwerjdenie ictinno, to wypoln_etc_ operator, cleduq`i' sa ~THEN~, ecli net, to prog- ramma perexodit k cleduq`e' stroke": 1 ... THEN w podprogramme prower_et ictin- noct^ utwerjdeni_ ~N bol^ve 10~. ecli utwerjdenie ictinno, to wypoln_etc_ operator, cleduq`i' sa ~THEN~, ecli net, to prog- ramma perexodit k cleduq`e' ctroke": 1 . Posemu polxzowatxsq kopirow} 1 . komanda";: 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 . 1 -dlq bukw. 1 -X;"-SWOBODNYH STROK " 1 -I5.FAV B 1 - wyhod iz programmy.": 1 - UROK7 ""podprogrammy.funkcii" 1 - UROK6""blok dannyh.massiwy.""": 1 - UROK 9 ""zwuki.cweta. grafika.""" 1 - UROK 8 ""rabota s wne{nej pamqtx`""": 1 - @to prikas pro-gramme pere'ti k stroke, nomer kotoro' ukasan @tim operatorom.": 1 - @to prikas pro-gramme pere'ti k ctroke, nomer kotoro' ukasan @tim operatorom.": 1 ,zna~enie, kotoroj nado izmenitx znak 1 ,w kotorom bukwy poqwlq`tsq kak zaglawnye.";: 1 ,kotorye ispolxzu`tsq dlq sostawleniq slovnyh uslowij. " 1 ,kotoroe wy~islqetsq i priswaiwaetsq peremennoj: 1 ,kotoroe budet priswoeno peremennoj 1 ,esli argument 1 ,,,,,,,,,,,,,,,,,,,,,,,,,,,,: 1 ,"Sentybr|",8 1 ,"Oktybr|",8 1 ,"Noybr|",8 1 ,"Fevral|",8 1 ,"Dekabr|",8 1 ,"Avgust",8 1 ,"Aprel|",8 1 , Nep-tun 1 +I4.FAV B 1 +602961611 1 +2400.0513 1 +1732564379 1 +"~to wse-rawno daet 0." 1 +"~it distanciq projdena." 1 +"~islqetsq.": 1 +"~isel.": 1 +"|lement bloka- MARIQ.": 1 +"{itx tekst |toj programmy.": 1 +"zna~enie 6.": 1 +"zilsq.": 1 +"zatem \tot 0 umnovaetsq na H,"+ 1 +"wy~islq`tsq.": 1 +"wypolnenie velaemoj komandy.": 1 +"wypolnenie komand, naprimer,"+ 1 +"wtorom slu~ae-dlq wwoda s diska"+ 1 +"wo wtoroj programme wytesnq`tsq"+ 1 +"wesx ukazatelx sprawo~nika.": 1 +"waetsq dlq wywoda na disk, a wo"+ 1 +"w q~ejki A$.": 1 +"w \WM.": 1 +"vimogo q~eek.": 1 +"veniq.": 1 +"ve q~ejku.": 1 +"trubke.": 1 +"tor s metkoj 7.": 1 +"teriala.": 1 +"telx diskety.": 1 +"t.e. k nul`.": 1 +"sprawo~nika.": 1 +"simwolow.": 1 +"simwolow'.": 1 +"simwolow w odnu cepo~ku (stro-"+ 1 +"rudnikow otdela.": 1 +"ratory.": 1 +"rabotu.": 1 +"qsx posledu`}im zna~eniem, raw-"+ 1 +"programm.": 1 +"priswaiwaniq i 997 operatorow"+ 1 +"primer, dlq perehoda na nee.": 1 +"pe~ati.": 1 +"otwedena 1 q~ejka.": 1 +"odnim imenem peremennoj.": 1 +"ob'em obolo~ki.": 1 +"nym 0.": 1 +"nuvnyj tekst.": 1 +"nuvno zarezerwirowatx 4 q~ejki.": 1 +"niq w tretx` stepenx.": 1 +"niq w simwolxnoe predstawlenie.": 1 +"nii funkcii.": 1 +"nie wsej programmy sna~ala.": 1 +"ne zapi{etsq.": 1 +"na klawiature nuvnye cyfry.": 1 +"mnogo takih boksow.": 1 +"meste programmy i perejti na"+ 1 +"libo ovidanie komand.": 1 +"ku simwolow).": 1 +"ke) najti nuvnu` komandu, na-"+ 1 +"ka simwolow'.": 1 +"imen argumentow pri ispolxzowa-"+ 1 +"gruppy operatorow.": 1 +"funkcii.": 1 +"etsq na 1 i otprawlqetsq w |tu"+ 1 +"estx uweli~iwaet H na 1.": 1 +"ego ocenok.": 1 +"dwa operatora pe~ati.": 1 +"drug drugom.": 1 +"dowatelxnostx komand w nuvnom"+ 1 +"dobawilasx edinica.": 1 +"dlq mnogokratnogo powtoreniq"+ 1 +"dit programmist s klawiatury.": 1 +"direktorii).": 1 +"awtomobilq, a kooperatiwnom -"+ 1 +"W\#"S\"K\6 1 +"WTORNIK": 1 +"Sergeewa' i ego priznak-nomer"+ 1 +"PQTNICA": 1 +"Nomer 5- koncu distancii.": 1 +"Nomer 3- {agu."+ 1 +"MX1:PROBA.BAS"+ 1 +"LUNA.COM"+ 1 +"LIZA.COM"+ 1 +"LISA.BAS": 1 +"K=1 do 20 s {agom 1.": 1 +"I \WM.": 1 +"DEJSTWIJ." 1 +"DEJSTWIE." 1 +"8-->5 stalo 8.": 1 +"5 i 6.": 1 +"3 DIM D(10)": 1 +"3 q~ejke K priswaiwaetsq 0,"+ 1 +"1985 goda.": 1 +"134255": 1 +"(metkoj) 3." 1 +" - "+w$(q): 1 + Del file 1 + (slovenie), - (wy~itanie), * (umnovenie), / (delenie). 1 *R*R*R/3": 1 *R*R*R/3 ","DEF FN S(R)=4*PI*R*R*R/3","EN" 1 *R*R *R/3-Q*4* 1 *R*R ","DEF FN K(R)=PI*R*R ","EN" 1 *R ","DEF FN L(R)=2*PI*R ","EN" 1 *I20.FAV B 1 *************** 1 *(R-D)*(R-D)*(R-D)/3": 1 *(R*R*R-(R-D)*(R-D)*(R-D))/3": 1 )=h$(a)+" Sektor : "+ 1 );W$(R,Q): 1 );" w ";z$(a,4 1 );" Sektor:";z$(a,18 1 );" ";V$(N) 1 )88))88)888888888888888888888888)88))88)888888888888888888888888((((((((((((((((((((((((((((((((()))))))))))))))))))))))))))))))()))))))))))))))))))))))))))))))()))))))))))))))))))))))))))))))(((((((((((((((((((((((((((((((( 1 )-C(cur2,2 1 ),Y(cur1,1 1 )+" MASTER SOFT": 1 ))/(tn^1.5 1 (x/co)*co)) 1 (wozwedenie w stepenx)" 1 (weig-sum)<0.5 1 (q-r-l)<0.5 1 (metkoj) 3. 1 (j1/12)+1": 1 (j/100)+1))" 1 (ce/o)-h*ce+ 1 (a/co)*co)) 1 (S)=2*PI*R* B 1 (0572) 98-81-35 Maxim 1 (.4*m+2.3)+ 1 ((j-1)/4)- 1 ((j-1)/100)+1))" 1 ((a+s)/360 1 (((z(a)-z(11 1 (((ol+ul)/m)/co))*co 1 'upr.perem.'='na~.zna~.";: 1 'I19.FAV B7 1 '''''''" 1. Grafik na mesyc"''" 2. Situaciy na dann{ 1 ''''"Imy:",: 1 ''"Data:",: 1 ''"Data rojdeniy:",: 1 ''"3- zikly podprogrammy perexody"''"4- Operatory 1 ' zdesx 'na~.zna~.','predel','{ag prira}eniq'- estx wyraveniq, prinima`}ie ~islowoe zna~enie." 1 %I18.FAV B 1 $$$$$$$$$$$$$$$ 1 $!*t*t+f)*15 1 #"a\"c\"e\>82 1 "~toby ~elowek uspel nabratx na" 1 "~toby snowa wkl`~itx skrolling?" 1 "~toby nape~atatx tysq~u zna~e-" 1 "~toby nape~atalisx ~isla ot 11" 1 "~toby iz q~ejki H nape~atatx" 1 "~toby prog-" 1 "~toby obespe~itx mnogokratnoe" 1 "~toby iz-" 1 "~toby nape-" 1 "~toby nape-" 1 "~to |tot format na samom dele" 1 "~to nape~ataet prog-" 1 "~to skopirowali operacionnu`" 1 "~to ozna~alo" 1 "~teniq, esli Wy dadite komandu" 1 "~islqlisx i pe~atalisx tolxko" 1 "~islom 145 ?" 1 "~islo 5 w q~ejku 'H', a soder-" 1 "~islo 4 ?" 1 "~islo 1 ?" 1 "~islennoe wyravenie posylaetsq" 1 "~isla, kratnye 3, t.e. 3,6,9..?" 1 "~isla programma ";: 1 "~isla budut nape~atany?" 1 "~ili prigla{enie $. ^to Wy wwo-" 1 "~estwo detej u dannogo sotrud-" 1 "~eniq A i W.": 1 "~eniem H, rawnym 1 ?" 1 "~emu rawny A i W ?" 1 "~e projdite w auditori` 6.' Ku-" 1 "~atx razmetku?" 1 "~atatx pqtx zna~enij iz q~ejki" 1 "~atalsq simwol 6 ?" 1 "~atalosx zna~enie ";: 1 "~atala 8 ~isel? Kak on budet" 1 "~ataet imenno 25 ?" 1 "~ataet WESNA. ^to w |toj prog-" 1 "~ata`tsq w \toj programme?" 1 "~asto risuet odno i tove izo-" 1 "~ani` 16 strok)." 1 "~alo na{ej programmy imeet sle-" 1 "}u` programmu. Kakie operatory" 1 "}u` beskone~nyj rqd ~isel po" 1 "}aq 100 operatorow cikla, sli{-" 1 "|tom skopirowatxsq na disketu w" 1 "|toj programme?" 1 "|toj diskete?" 1 "|toj ve diskete fajl dannyh" 1 "|tih tetradej bolee udobna dlq" 1 "|tih dwuh programm Wy obnaru-" 1 "|ti predloveniq." 1 "|taoperaciq imeet wys{ij urowenx star{instwa sredi logi~eskih operacij.": 1 "|ta stroka kopiruetsq w nivn`` ~astx|krana,gde w nee movno wnositx izmeneniq(redaktirowatx)." 1 "|lement ";: 1 "|kwiwalenten odin kooperatiwnyj" 1 "|krannogo redaktora posle is-" 1 "| WORD | EOL | CUT |" 1 "| PAGE | FINDNEXT| DELWORD |" 1 "| OPENLINE | RESET |" 1 "| GOLD | HELP | DELLINE |" 1 "| COMMAND | FIND |UNDELWORD|" 1 "| CHANCASE| DELEOL | PASTE |" 1 "| BOTTOM | TOP |UNDELCHAR|" 1 "| BLINE | SELECT |" 1 "| APPEND | | SPECINS |" 1 "| ADVANCE | BACKUP | DELCHAR |" 1 "| Manager_________________1 |" 1 "| Hotels_________________13 |" 1 "| Commercial Department___3 |" 1 "| Chief Engineer__________2 |" 1 "| Apotheka________________5 |" 1 "| Airports________________7 |" 1 "| 7 | 8 | 9 |" 1 "| 4 | 5 | 6 |" 1 "| 1 | 2 | 3 |" 1 "| | SECTION | |" 1 "| | REPLACE | ENTER |" 1 "| | |UNDELLINE|" 1 "| | |SUBSTITUT|" 1 "| 0 | , |" 1 "{el ne iz operatora 5, a iz" 1 "{aga 2 metra? 3 metra?" 1 "zywaet na na~alo teksta, naj-" 1 "zwonitx, ~to on delaet?" 1 "zu po-russki i postawxte ee w" 1 "zowatx komandy ";: 1 "zna~enij H, kotorye wy~isleny" 1 "zna~ek '$'. Dalee wnimatelxno" 1 "zitx smysl |lementa * w komande": 1 "zitx iz MH1:. Wykl`~ili i wnowx" 1 "zawisit, skolxko ~isel i kakie" 1 "zawer{eniq razmetki wernutxsq w" 1 "zatem e}e 1 rublx. Skolxko sta-" 1 "zatem klawi{u S" 1 "zatem klawi{u S wmeste s klawi{ej": 1 "zatelem sekcii.": 1 "zaprosu \WM wwesti dwojku?" 1 "zapisx segmenta redaktirowaniq" 1 "zapisi kulinarnyh receptow?" 1 "zapisej na diske. Skolxko zapi-" 1 "zapisany na bumage. Kak ih" 1 "zamenqet odin operator ";: 1 "zamenqet massiw ";: 1 "zakrytie wspomogatelxnogo wy-" 1 "zakon~itsq rabota programmy ";: 1 "zagruzki?" 1 "zagruzka - WOOT)." 1 "zagruvena. Kakie dwa osnownyh" 1 "za kavdoj iz |tih komand sleduetkl`~ewoe slowo-imq programmy, opredelennoe perwona~alxno w komande";: 1 "wy~islqetsq wes razli~nyh sfe-" 1 "wy~islqet i" 1 "wy~isleniq?": 1 "wy~isleniq:": 1 "wy~er~i-waet okruvnostx radiusa";: 1 "wyzywaet" 1 "wyzywaet poqwlenie znaka,w protiwnom slu~ae oni da`t simwoly,uprawlq`}ie cwetom." 1 "wyswe~iwaetsq soob}enie ob ob-" 1 "wyraveniq net nikakih razdelitelej, to perwoe wstretiw{eesq";: 1 "wyravenie,zna~enie kotorogo wywoditsq w operatore";: 1 "wypolnqtxsq posle ~etwertogo" 1 "wypolnqtx...": 1 "wypolnqq operator s metkoj 5 ?" 1 "wypolnqetsq 100 raz,no kavdyj raz s drugim zna~eniem peremennoj";: 1 "wypolnqet razmetku" 1 "wypolnitsq, esli w" 1 "wypolnitsq bolx{e operatorow?" 1 "wypolneno, esli budet imetx" 1 "wypolneniq konandy ";: 1 "wypolnenie operatorow s metkami" 1 "wyp","pusk","na~","rab","WYP","PUSK","NA^","RAB","EN" 1 "wyhod","uhod","pokid","POKID","WYHOD","UHODIT","EN": 1 "wyglqdetx?" 1 "wybrosiw predlog i" 1 "wyborke na |krane i qwlq`tsq li" 1 "wwoda zapisany uve na Bejsike." 1 "wwod","WWOD","EN" 1 "wwesti w \WM dlq rabota`}ej" 1 "wwesti imq kartoteki. Dalee" 1 "wwedite |to slowo." 1 "wwedena komanda:": 1 "wwedena komanda": 1 "wwedem w q~ejku K dwojku?" 1 "wu` distanci` po begowoj dorov-" 1 "wtorq`tsq w programme ";: 1 "wtoroj ";: 1 "wspomogatelxnyj fajl." 1 "wseh otkrytyh fajlow neobhodimo" 1 "wsego zna~enij weli~iny K ?" 1 "wsegda","WSEGDA","HOTX KOGDA","L@BOJ MOMENT","KOGDA UGUDNO","EN" 1 "wse","WSE","EN" 1 "wprawo - 1 "wplotx do predydu}ego ograni~i-" 1 "wozwra}aet dlinu zadannogo w nejstrokowogo argumenta: wwedite ";: 1 "wozwra}aet obrabotku" 1 "wozwrat"," prawilxno !!! "," newerno ... " 1 "wos","8 ","WOSEMX","EN": 1 "wom revime. Redaktor K52 pri" 1 "woda'. ^to nuvno otwetitx?" 1 "wod na anglijskij qzyk glagola" 1 "wnutri ee opisaniq funkci` ";: 1 "wmesto mnogoto~ij w |toj prog-" 1 "wkl`~ili pitanie i pulxt i po-" 1 "wkl`~ena, operacionnaq sistema" 1 "wi{u <";: 1 "witx, postawitx posle operatora ": 1 "witx k poslednej programme ";: 1 "witx k predydu}ej programme," 1 "witx k poslednemu wariantu" 1 "witsq i wydast soob}enie ob" 1 "wii so strokoj, qwlq`}eysq uka-" 1 "widite smysl ukazaniq (4 TO 6)" 1 "wesa obolo~ki?" 1 "werhnosti obolo~ki. ^emu rawen" 1 "wenstwo H=H+1 ?" 1 "watx fajl ";: 1 "warianty otwetow:": 1 "wano ranx{e poqwleniq operatora": 1 "wannu` (razme~ennu`) i inicia-": 1 "wal perehod na operator 3 tolx-" 1 "waetsq fajlom. No po nomeram" 1 "waet wywod na |kran.": 1 "w*10+350": 1 "w |tu programmu, ~toby" 1 "w |tom revime navatie daet odin simwol ili znak, esli revim sohranqetsq,i drugoj,esli odnowremenno navata odna iz klawi{ smeny revima. odnowremennoe navatie cifrowyh klawi{ s klawi{ej smeny revima ";: 1 "w wyhodnoj wspomogatelxnyj fajl": 1 "w werhnem, lewom uglu.": 1 "w revime";: 1 "w q~ejku" 1 "w q~ejku K.": 1 "w q~ejku K wwesti dwojku?" 1 "w q~ejke S$" 1 "w programme, a wwodqtsq w ma{i-" 1 "w programme kotoraq, numeruet" 1 "w predelah zadannogo segmenta" 1 "w perwom i wo wtorom slu~ae?" 1 "w otwet na wopros NOMER MESQCA?" 1 "w otwet na prigla{enie '$' imq" 1 "w opredelennyh sostoqniqh klawi {i ";: 1 "w opisanii ";: 1 "w operatore";: 1 "w operatore 4 ?" 1 "w operatorah";: 1 "w operatorah 4 i 5 ?" 1 "w nivn`` ~astx |krana wywodqtsq takve soob}eniq ob o{ibkah, kotorye sohranq`tsq tam do navatiq l`boj iz klawi{." 1 "w nem begaet belka?" 1 "w kompx`tere ";: 1 "w komandnyj revim wo wremq na-" 1 "w kavdoj {erenge?" 1 "w skobkah posle ";: 1 "w rezulxtate raboty programmy" 1 "w programme ";: 1 "w operato-": 1 "w programme ";: 1 "vitx wypolnenie programmy." 1 "vitx dlq wy~isleniq wesa l`bogo" 1 "vimogo |krana posle ispolxzowa-" 1 "vimogo |krana (esli ispolxzowa-" 1 "vimoe q~ejki bylo rawno 0, ka-" 1 "vili? (Nazowite operatory," 1 "ven navatx specialxnu` klawi{u" 1 "ve programmy?" 1 "ve diskete MH1 posle wypolneniq" 1 "vatxsq w q~ejkah pamqti, imena" 1 "vanie fajla ";: 1 "va`}u` smysl 'wydatx na tele-" 1 "u~ebnika po qzyku Bejsik i ot-" 1 "u~","U^EBN","U^EN","EN" 1 "uznatx, kakie fajly ime`tsq na" 1 "ustrojstwo s ispolxzowaniem " 1 "uroke, imeet u~ebnyj harakter." 1 "uni~t","ster","stir","sotr","SOTR","STIR","zamen","ZAMEN","ZAME]","zame}","STER","UNI^TOV","UDAL","PROPA","EN" 1 "united-states ","UNITED-STATES ","EN" 1 "umol~ani` qwlqetsq simwol <";: 1 "ukazatx nomer stroki,s koto-roj budet wypolnqtsq programma." 1 "ukazatelx:": 1 "ukazatelem stranicy (po umol~a-" 1 "ukazatele ne raspe~atalasx, ho-" 1 "udelxnyj wes materiala.": 1 "udalenie teksta do" 1 "udalenie teksta do" 1 "udalenie teku}ego" 1 "udalenie teksta do" 1 "udalenie predydu}ego" 1 "udalenie stroki" 1 "type mx0:rodin.txt ","TYPE MX0:RODIN.TXT ","EN" 1 "type ","TYPE ","EN" 1 "ty programm ";: 1 "ty podprogrammy pri H=3 ?" 1 "ty ne gruzitsq! Mogla li by za-" 1 "ty podprogrammy ";: 1 "turisti~eskom sprawo~nike:": 1 "turalxnogo rqda programmist so-" 1 "tu \toj programmy?" 1 "tron ","TRON ","EN" 1 "tri zna~eniq: 0 1 2 ?": 1 "tri q~eiki ?" 1 "tri ","TRI ","3 ","EN" 1 "tretij operator?" 1 "tr","3 ","TRI ","EN" 1 "tq na samom dele ona estx i" 1 "to~ku wozwrata?" 1 "to~ku wozwrata, esli" 1 "towkoj dlq oglawleniq. Kakaq iz" 1 "towki operacionnoj sistemy na" 1 "tow. Kakoj |lement obozna~aet" 1 "tory s metkami 3, 4, 5, 6, -" 1 "toru bystro korrektirowatx swoi" 1 "torq`tsq 20 raz?" 1 "torq`tsq cikli~eski w |tih" 1 "tora: H=H+1 ?" 1 "tora ";: 1 "tor s nomerom (metkoj) 5 ?" 1 "tor izobraven zelenym cwetom," 1 "tor daet prikaz zakon~itx rabo-": 1 "tol}ina obolo~ki,": 1 "tolxko ~etnye ~isla?" 1 "tolxko ne o~i}aet ws` pamqtx,a li{x zamenqet te stroki programmy ili peremennye,u kotoryh sowpada`t nomera ili imena s takimi ve na magnitnoj lente.": 1 "togda navmite na klawi{u ";: 1 "to woprositelxnyh znakow?" 1 "to wmesto programmy ";: 1 "to teku}aq stroka perenositsq w nivn`` ~astx |krana , gde ona movet redaktirowatxsq.": 1 "tiwnogo garava w gorode?" 1 "tiq klawi{ ";: 1 "temu iz MH0: i hotite razmetitx" 1 "temnogo ustrojstwa." 1 "telxnogo whodnogo fajla.": 1 "telq stroki i sohranenie uda-" 1 "teletajp","TELETAJP","EN" 1 "telega","ulitka","fonarx","hleb","cwetok","~ajnik","{ar","}it","%","y","x","|kskawator","`la","qbloko" 1 "tela iz odnorodnogo materiala?" 1 "tekstowyj tip.": 1 "tekstowyj fajl i": 1 "teksta ~itaemogo fajla po |k-" 1 "te MH0, esli posle |togo wypol-" 1 "taty ras~etow?" 1 "tami, a drugu` s pronumerowan-" 1 "talsq sledu`}ij ukazatelx (og-" 1 "taki rezulxtat proizwedeniq" 1 "taki budet imetx fajl ";: 1 "taet w |toj programme?" 1 "taet programma ";: 1 "taet \ta programma?" 1 "taet programma ";: 1 "ta wesa sferi~eskoj obolo~ki:": 1 "t.e. te, kotorye nahodqtsq mev-" 1 "system","SYSTEM","EN" 1 "swoej rabote zanimaet operatiw-" 1 "swe~iwaetsq ta ~astx fajla, gde" 1 "summu tretxej" 1 "summe wosxmi ~isel 1+2+3+..+8 ?" 1 "stwu`}aq klawi{a podkra{iwaetsq": 1 "stwii so strokoj, qwlq`}ejsq" 1 "studentu ni~ego ne goworqt. Po" 1 "stroke 2 ?" 1 "stroka programmy, ~toby priswo-" 1 "strok w pokazannom fragmente" 1 "stranicy. Na~alom stranicy po" 1 "stranic, na kotoryh bylo oglaw-" 1 "sto","100 ","STO ","EN" 1 "ster","uni~t","propa","udal","STERT","UNI^TOV","PROPA","UDAL","EN": 1 "stawlqet programmu iz dwuh ty-" 1 "stargazer" 1 "sq~ operatorow, to takogo prog-" 1 "sq posle operatora 8 pri H=5 ?" 1 "sq ispolxzowatx sledu`}ie ko-" 1 "sq dostupnymi dlq wnimatelxnogo" 1 "sprawo~nike swedenij o woennyh" 1 "sprawa ot znaka =, a zatem wy-" 1 "sportsmena, kakoj ego {agu i" 1 "spiski abiturientow, za~islen-" 1 "sostoqniq harakterizu`t ee" 1 "sostoit iz" 1 "sootwetswu`}u` komandu.": 1 "sootwetstwenno. esli wwedeno ";: 1 "soldata?" 1 "sohranenie ego w bufere stroki.": 1 "soglasno zame~ennoj zakonomer-" 1 "sodervittolxko parametry wywoda,a opera-tor";: 1 "sodervit odnu ili neskolxko konstant,razdelennyh zapqtymi." 1 "sodervimoe pustoj q~ejki H pos-" 1 "sobstwenno imq fajla?" 1 "sobesedowanie w kabinet 5, ina-" 1 "snqli wse, krome poslednih" 1 "snowa zapisywaet '0' w q~ejku H" 1 "smysl |lementa % w komande": 1 "slowo: PETRO" 1 "slowo. Pri pomo}i navatiq kom-": 1 "slowo MARIQ. ^to sdelal opera-" 1 "slowo '~asy'." 1 "slowo 'sistema'?" 1 "slowo ";: 1 "slowo iz bloka ";: 1 "slowa ";: 1 "sleduet rabotatx po ukazani`" 1 "sledu`}imi fajlami:": 1 "sledu`}ie fajly:": 1 "sledu`}ego ograni~itelq stroki," 1 "sledu`}ee men`:": 1 "sledite za soob}eniqmi \WM." 1 "sled","drugoj","SLED","DRUGOJ","EN": 1 "skolxko na diskete MH0 programm" 1 "skobkah ukazana neobqzatelxnaq" 1 "skazatx," 1 "sistemu. Podwedem itog: kakie 4" 1 "sistemu komandoj ";: 1 "sistemu komandu ";: 1 "sistemoj. Wy wweli komandu:": 1 "sistema nahoditsq na diske w" 1 "sistema ee ispolxzuet (naprimer" 1 "simwoly odinakowy ","SIMWOLY ODINAKOWY ","EN" 1 "simwoly ne odinakowy ","SIMWOLY NE ODINAKOWY ","EN" 1 "simwol pered kursorom movet bytx udalen komandoj ": 1 "simwol '*'." 1 "signaliziruet o sostoqnii ovi-" 1 "sformiruet iz ~astej A$ i W$" 1 "selxskogo vitelq ot koopera-" 1 "sel budet pe~atatx |ta program-" 1 "sekcii. Zna~eniem po umol~ani`" 1 "sej wywodit na disk sledu`}ij" 1 "segmenta redaktirowaniq.": 1 "sboq displeq.": 1 "sama na sebq w operatore 11 ?" 1 "s prowerkoj. ^to sdelaet prog-" 1 "s ograni~itelem stroki.": 1 "s neobhodimoj programmoj?": 1 "s metkoj 5 ~toby programma pe-" 1 "s kakimi metkami ne budut wy-" 1 "s imenami MH0: i MH1:. Na kakom" 1 "s ","S ","EN" 1 "s diskety MH1 na" 1 "russkom qzyke?" 1 "russkom qzyke sformulirowatx" 1 "rudnikah na dolgoe wremq?" 1 "ru`tsq zadannymi ~islami." 1 "ru` sna~ala polovim 1 rublx," 1 "rowaniq." 1 "rowaniq operacionnoj sistemy iz" 1 "row ","ROW ","EN" 1 "row uslownogo i bezuslownogo" 1 "rodin.txt ","RODIN.TXT ","CO","elsa.txt ","ELSA.TXT ","EN" 1 "robin.dat ","ROBIN.DAT ","EN" 1 "robert.com ","ROBERT.COM ","CO","scoons.com ","SCOONS.COM ","EN" 1 "ri~eskih obolo~ek?" 1 "rex1.bas","REX1.BAS ","EN" 1 "rex1.bas ","REX1.BAS ","EN" 1 "rex.bas ","REX.BAS ","EN" 1 "revim kursora";: 1 "revim ";: 1 "reteniq i zakrepleniq nawykow" 1 "rename ","RENAME ","EN" 1 "ren mx0:rex1mbas mx0:rex2.bas ","REN MX0:REX1.BAS MX0:REX2.BAS ","EN" 1 "redx. Kogda ~elowek zakon~il" 1 "redaktor wypolnqet komandy ili" 1 "redaktirowaniq.": 1 "raznica mevdu nomerami metok" 1 "razme}atx fajl ";: 1 "razmetka","format","RAZMETKA","FORMATI","EN" 1 "razmetka s prowerkoj" 1 "razdeli-telqmi.esli posle wyraveniq sto-it to~ka s zapqtoj,to sledu`}ee";: 1 "rawen H posle wypolneniq opera-" 1 "ratorah 4 i 5 w programme" 1 "rator 5, ~toby on programmiro-" 1 "rator s metkoj 4 (napomnim:" 1 "rator 'soob}aet' operatoru": 1 "ras~ety. Printer okazalsq neis-" 1 "raspe~a-" 1 "ranx{e, ~em Wy ee zapi{ite na" 1 "ranu) movno ostanowitx, navaw" 1 "rannogo redaktora K52. " 1 "raneniq.": 1 "ranenie ego w konce bufera soh-" 1 "ranenie ego w bufere (razmer" 1 "rana posle ispolxzowaniq funk-" 1 "ran programma ";: 1 "rammy, kotorye organizu`t cikl," 1 "rammy sotwetstwuet na~alu bega" 1 "rammu wmeste i wypolnim |tu ob-" 1 "rammoj razmetki ";: 1 "rammista ni odin rukowoditelx" 1 "ramme? Haoti~no?" 1 "ramme, ~toby operatory 3 i 4" 1 "ramme delaet operator ";: 1 "ramma A1 i skolxko W1 ?" 1 "ramma A i skolxko programma W ?" 1 "ramma ";: 1 "raet na scene?" 1 "radiusom A. Wy~islim plo}adx" 1 "radius sfery, obrazu`}ij" 1 "raboty s redaktorom tekstow." 1 "rabotaet,dave esli blok ne pust.": 1 "r","R ","EN" 1 "q~ejki K% ?" 1 "q~ejki 'H'?" 1 "q~ejke W$ ?" 1 "q~ejke S$ w operatore 6 prog-" 1 "q~ejke M w operatore 5 ?" 1 "q~ejke H ~islo 8?" 1 "q~ejke ";: 1 "q~ejke K w operatore 7 |toj" 1 "q~ejkam K i ";: 1 "q~ejkah pamqti ";: 1 "q~eek ";: 1 "qwlqetsq 16 strok." 1 "qwlqetsq operatorom" 1 "qwitxsq bukwa 'S', posle |togo" 1 "pustx |ta funkciq imeet imq": 1 "punkte glawnogo men`.": 1 "pro~itatx sozdannyj Alekseewym" 1 "prowerqet programmu i peremennyew pamqti kompx`tera po ih kopii na lente." 1 "prosmotr fajla ": 1 "proizwodit wy~islenie K ?" 1 "proizwedenie 1*2*3*4 ?" 1 "prohod' w programme ";: 1 "programmy movno na~atx s l`boj stroki.naprimer,";: 1 "programmy 'WOWA'?" 1 "programmy ";: 1 "programmu:": 1 "programmu 2RQDA:": 1 "programmist zakazywaet" 1 "programmirowanii?" 1 "programme ?" 1 "programme 'SWETA'?" 1 "programme 'WOWA' i skolxko w" 1 "programme ";: 1 "programmami na Bejsike i Paska-" 1 "programmah?" 1 "programma": 1 "programma ?" 1 "programm?" 1 "programm:": 1 "proba ","2 ","PROBA ","EN" 1 "priwodit k velaemomu rezulxtatu." 1 "priwode MH0:, i Wy hotite sko-" 1 "priwode MH0: disketa s operaci-" 1 "priwoda MT0 ?" 1 "priwet","maly{","*","*","ty","mne","pakavyka","slowa": 1 "printer","PRINTER ","EN": 1 "print mx0:rodin.txt ","PRINT MX0:RODIN.TXT ","EN" 1 "print mx0:rita.bas ","PRINT MX0:RITA.BAS ","EN" 1 "primernyj wid kotorogo sledu`}ij": 1 "primer, fajla ";: 1 "primenqetsq operator ";: 1 "prika","ukaz","PRIKA","UKAZ","EN": 1 "prigla{enie:'Ukavite nomer pri-" 1 "priboru stalo wozmovno sozdanie" 1 "pri wwode edinicy?" 1 "pri navatii ";: 1 "pri dline {aga 2 m, esli na~net" 1 "pri K%=4 ?" 1 "pri H=5 ?" 1 "pri H=2 ?" 1 "pri normalxnom" 1 "prevde ~em kopirowatx na nee" 1 "preobrazuet ~islo w simwolxnyj wid:";: 1 "preobrazuet drob- noe ~islo k celomu otbrasywaniemdrobnoj ~asti: ";: 1 "preobrazuet argu- ment w polovitelxnoe ~islo: ";: 1 "prejskuranta (DWK):": 1 "predydu}ej stroki i sohranenie" 1 "predydu}ego slowa.": 1 "prednazna~en dlq raboty w fono-" 1 "predlagaet men`," 1 "prawnym. Kak sohranitx rezulx-" 1 "pqt","5 ","PQTX","EN": 1 "pqt","5 ","PQT","EN" 1 "pozwolqet wosstanowitx blok dannyh,p0sle ego wypolneniq wyborkana~inaetsq s perwogo ~isla w bloke dannyh.operator ";: 1 "pozici` w lewyj werhnij ugol |k-rana.": 1 "powtorqlisx mnogokratno, kak" 1 "powtorno.": 1 "powtor","perej","pereda","POWTOR","PEREJ","PEREDA","EN" 1 "postrojte po-" 1 "postoqnnyj?" 1 "postoqnna?" 1 "posledowatelxnostx wypolneniq operatorow programmy ne wsegda predskazuema.w nekotoryh mestah programmy kompx`ter movet prinimatx re{eniq o dalxnej{em hodewy~islenij.operator,wypolnq`}ij |to imeet formu:" 1 "posledowatelxnostx simwolow,na-" 1 "posled","o~ered","grupp","POSLED","O^ERED","GRUPP","CO","komand","operat","KOMAND","OPERAT","EN": 1 "posle |togo na |krane poq witsq rezulxtat.esli wwesti ";: 1 "posle wypolneniq operatora 16 ?" 1 "posle razmetki," 1 "posle operatora ";: 1 "poslatx ~islo 8, to kakoe ~islo" 1 "porqdku:": 1 "porqd","posled","PORQD","POSLED","EN": 1 "ponedelxnik","PONEDELXNIK ","EN" 1 "polxzuq slowarx: 'idi k podpro-" 1 "polxzuetsq kombinaciq operato-" 1 "polxzowatx funkci` <SU/";: 1 "polxzowaniq <SU/";: 1 "polxzowanii funkcii <";: 1 "polu~im programmu ";: 1 "polnqq operator s metkoj 2," 1 "polnostx` o~i}aet pamqtx kompx`tera t.e. stiraet wse programmy.": 1 "polneny?" 1 "pojas2 ","POJAS2 ","EN" 1 "podkra{iwaniq)." 1 "podkl`~ennom magnitofone wwesti" 1 "po-anglijski?" 1 "po sledu`}emu operatoru:": 1 "po odnomu rubl`?" 1 "po obozna~eni` peremen-noj nelxzq opredelitx ee zna~e- nie.ono movet neodnokratno izme-nqtxsq wo wremq wypolneniq prog-rammy." 1 "plo}adi kruga - ";: 1 "plee wyswe~iwaetsq klawiaturnaq" 1 "pisx, ne otkrywaq ego?" 1 "piruet wse fajly, krome sistem-" 1 "pirowatx ee na otformatirowan-" 1 "pirowannyj na disketu MH0: fajl" 1 "pirowaniq?" 1 "pe~itx pe~atx rqda ~isel" 1 "pe~atx teksta": 1 "pe~atala takie ~etyre ~isla:" 1 "pe~ataet ~islo" 1 "pe~ataet programma?" 1 "pe~ataet 20 zna~enij massiwa" 1 "petrowa ","PETROWA ","EN" 1 "perwogo simwola sledu`}ego slo-" 1 "perwogo simwola teku}ego ili" 1 "perehodow?" 1 "perehod","pereda","PEREHOD","PEREDA","IDET","EN" 1 "perehod","pereda","PEREHOD","PEREDA","EN" 1 "perehod na operator 10 proizo-" 1 "perehod k wypolneni` tretxego" 1 "parowoz ","PAROWOZ ","EN" 1 "pamqti zanimaet odno ~islo?" 1 "pamqti H:": 1 "pamqt","zapom","PAMQT","ZAPOM","EN": 1 "paketa, s u~etom razmerow prog-" 1 "o~i}aet pamqtx kompx`tera ot wseh programm i zagruvaet w nee nowye,s~itannye s magnitofona.": 1 "o{ibke, esli proizo{el perehod" 1 "ovidan","OVIDAN","EN" 1 "otwetstwuet situaciq ";: 1 "otwet na |tot ve wopros wwesti" 1 "otsutstwuet,to weli~ina {aga prira}eniq rawna 1.": 1 "otsutstwuet numeraciq sektorow" 1 "otpuskaq ee navmite na '2'. W" 1 "otmenqet gra-" 1 "otmena teksta do konca" 1 "otmena otkrytogo wspomogatelx-" 1 "otkrytie wspomogatelxnogo whod-": 1 "otkrytie wspomogatelxnogo wy-" 1 "ostawiw ot slow maksimum po 3" 1 "ostanowilsq kursor.": 1 "ostanawliwaq kompx`ter s wyda~ej soob}enij.": 1 "opredelqet i priswaiwaet q~ejke": 1 "opredelqet massiw s imenem w-razmernostx` 5": 1 "opredelqet cwet bord`ra." 1 "opredelenie stranic kak zadan-" 1 "opredelenie sekcii kak zadan-" 1 "opredelenie sekcii w sootwet-" 1 "operatory" 1 "operatory programmy:": 1 "operatory 5 i 6 budut propu}eny" 1 "operatoru" 1 "operatoru s metkoj 3 ?" 1 "operatorow w programme:": 1 "operatorow 2 i 3, ~toby zna~e-" 1 "operatorom ";: 1 "operatore cikla programmy ";: 1 "operatore 3 nahoditsq staroe" 1 "operatora, esli wtoroj operator" 1 "operatora 8 ?" 1 "operatora ";: 1 "operatora 2, nazna~im imena" 1 "operator?" 1 "operator 3 uweli~iwaet H na 1," 1 "operator 3 ). Kak izmenitx ope-" 1 "operator 'WWOD K' ?" 1 "operatiwnoj pamqti \WM w moment" 1 "operacionnyh sistem?" 1 "operacionnyh sistem |ti osoben-" 1 "operacionnoj sistemy?": 1 "onnoj sistemy?" 1 "onnoj sistemoj i dwadcatx`" 1 "oni programmami?": 1 "oko{ke predlogaetsq simwol, a w" 1 "okon~anii wwoda kavdoj stroki": 1 "okavetsq, ~to A bolx{e W, takim" 1 "oglawlenii?" 1 "oformitel`, esli on dowolxno" 1 "odnowremenno klawi{i ";: 1 "odno ~islo?" 1 "odnim. Popytajtesx na" 1 "odni edinicy?": 1 "odinakow","NI^EM","NE OTLI^","ODINAKOW","EN" 1 "od","Od","ODNU","1 ","EN" 1 "od","1 ","ODNU","EN": 1 "od","1 ","ODNO","EN" 1 "od","1 ","ODN","EN" 1 "ob}ego wida, wy~islq`}u`": 1 "ob}","razg","besed","OB]EN","RAZG","BESED","GOWOR","EN" 1 "ob}","progr","OB]EN","PROGRAM","DIALOG","CO","\WM","|wm","ma{","MA[IN","KOMPX@T","EN": 1 "obrazom oni mogut bytx nuvny," 1 "obozna~enie argumenta - ";: 1 "obozna~aet |to ~islo": 1 "obnul","o~ist","OBNUL","O^IST","EN" 1 "oba raza wwesti simwol ";: 1 "ob'qwlenie: 'Esli Wa{ srednij" 1 "ob'ema sfery - ";: 1 "ob'ema sferi~eskoj obolo~ki bu-" 1 "ob'em obolo~ki?" 1 "ob'ekt sostoit iz treh |lemen-" 1 "nymi stranicami i listom-zago-" 1 "nym blagodarq forme:": 1 "nyh. Perewedite na anglijskij" 1 "nyh w institut?" 1 "nyh na klawi{e, powtorenie" 1 "nye Wam fajly? ^to nuvno sde-" 1 "nuvnoe mesto." 1 "nuvno: ";: 1 "nuvno izmenitx, ~toby pe~atatx" 1 "nuvno izmenitx, ~toby pe~ata-" 1 "nuvno izmenitx, i kak izmenitx," 1 "nuven w programme ";: 1 "numeruemyh peremennyh ";: 1 "nulewoj blok na nulewoj dorovke" 1 "nu` pamqtx ob'emom 16K slow. ": 1 "nu` disketu w MH1:. Kak Wy so-" 1 "nu {erengu, i pe~ataet ih nome-": 1 "nu posle puska programmy.": 1 "nqtxsq, esli po hodu programmy" 1 "nowoj diskete? Perwoe dejstwie?" 1 "nownoj fajl.": 1 "nostx`)." 1 "nosti. Skolxko raz umnovitsq H" 1 "nositelqh. Wydawaemye program-" 1 "nomeru {erengi, a kakaq pere-" 1 "nomerom 2, ~toby programma na-" 1 "nomeram ih u~itywala ma{inistka" 1 "nomer {erengi," 1 "nomer stroki 10": 1 "nomer fajla (naprimer, #1 ili" 1 "noj iz sledu`}ih form:": 1 "noj \WM movno e}e wywesti so-" 1 "noj ~asti programmy ";: 1 "nogo wyhodnogo fajla.": 1 "nogo koli~estwa strok.": 1 "nogo koli~estwa strok (po umol-" 1 "nogo fajla": 1 "noe ~islo?" 1 "noe <SU/O> wyzywaet prerywanie" 1 "no zamenqet wse tri operatora:" 1 "no raznica mevdu nomerami metok" 1 "no |to ne s~ita-" 1 "nitx operator s metkoj 2 ?" 1 "nitx e}e komandu:": 1 "niq tangensa k |toj ve program-" 1 "niq slagaemogo w |toj programme" 1 "niq sinusa" 1 "niq s diskety MH1 na disketu MH0" 1 "niq kotangensa k |toj ve prog-" 1 "niq kosinusa k programme ";: 1 "niq A i W movno bylo wwesti s" 1 "niq funkcii ";: 1 "nikogda ne budut wypolneny w" 1 "nikog","ne","NE","NIKOGDA","EN" 1 "nika. Kakih operatorow ne hwa-" 1 "nij H: 0, 1, 2, ..., 998, 999 ?" 1 "nij H nakapliwaetsq w ";: 1 "nicy teku}ego segmenta redakti-" 1 "ni` simwol <";: 1 "ne~etnye ~isla?" 1 "net","porqd","NET","PORQD","EN": 1 "neskolxko inoj:": 1 "nepostoqnna?" 1 "neogran","mnogo","beskon","NEOGRAN","MNOGO","BESKON","HOTX SKOLXKO","EN" 1 "neobhodimo ispolxzowatx komandu": 1 "nenii 4-go operatora?" 1 "nem geroq, rolx kotorogo on ig-" 1 "ne izwestno zaranee, ~emu rawny" 1 "ne hranqtsq odnowremenno wse 8" 1 "ne budut wypolnqtsq?" 1 "ne budet dervatx na rabote." 1 "ne sowpada`t s imenem" 1 "na~inaet s~itywatxsq l`baq in-" 1 "na~alo |togo fajla." 1 "nazywaetsq upraw- lq`}ej.uprawlq`}aq peremennaq dolvna sostoqtx iz odnoj bukwy.": 1 "nazwaniq knig?" 1 "nazwaniq zapisannyh na disk" 1 "navimajte klawi{u WWOD!" 1 "navatx na klawi{u s izobraveni-" 1 "naruvennoj o{ibke.": 1 "naq strelka, za wremq w te~enie" 1 "naq sistema. Popytajtesx zagru-" 1 "naprimer, pri wwode 2 ona nape-" 1 "naprimer, s magnitnoj lenty" 1 "nape~atatx iz q~ejki H ~isla:" 1 "nape~atala slowo": 1 "nape~atala cifru 5. ^to" 1 "nape~ataet:" 1 "nape~ataet slowo:" 1 "nape~ataet slowo ";: 1 "nape~ataet 45." 1 "nape~ata-" 1 "nahoditsq w nutri okruvnosti s" 1 "nabratx na klawiature 5-tizna~-" 1 "na {estoj operator? Kakoj ope-" 1 "na programmu ";: 1 "na operator 10 iz operatora 8 ?" 1 "na nuvnyj" 1 "na nih e}e ne nabran." 1 "na ee zapros wwesti trojku?" 1 "na disk w fajl #1 ?" 1 "na Paskale?" 1 "na Bejsike, i skolxko programm" 1 "n","NET","EN" 1 "n","N","NET","EN" 1 "n","N","NET ","NELXZQ ","EN" 1 "n","N","0 ","NUL","EN" 1 "my wweli 3.14 ?" 1 "my wwedem 3 ?" 1 "my otdaet \WM prikaz pe~atatx K?" 1 "my 'WOWA' i 'SWETA'?" 1 "mx1","Mx1","MX1","EN" 1 "mu q~ejki H kassy e}e 1 rublx." 1 "movete navatx na WWOD." 1 "movet","dolvna","pe~at","MOVET","DOLVNA","PE^AT","CO","PE^AT","pe~at","pokav","wyw","POKAV","WYW","KO" 1 "monitora OS DWK, podobnye ";: 1 "monitora operacionnoj sistemy" 1 "monitor operacionnoj sistemy?" 1 "moj soob}eniq pozwolq`t opera-" 1 "mogut raspolagatxsq w l`bom meste programmy.waven li{x porqdok ih raspoloveniq.~isla izbloka dannyh posledowatelxno wy-bira`tsq i priswaiwa`tsq peremennym s pomo}x` operatora 1 "mnogo""": 1 "miga`}em kwadrate dolvna bytx" 1 "mi 148 i 149 ?" 1 "metrowoj otmetki?" 1 "metkoj 2 w programme ";: 1 "metkoj 3, ~toby nape~atalisx" 1 "meti~eskoe wyravenie, stoq]ee" 1 "mesto wywod dannyh w fajl #2 ?" 1 "mest","MEST","EN" 1 "meruet 50 soldat, stoq}ih w od-" 1 "menx{e W, i posle operatora 4" 1 "mennaq sootwetstwuet nomeru" 1 "menitx, ~toby nape~atalsq wse-" 1 "menitx tri operatora |toj prog-" 1 "men`. Dlq togo, ~toby wernutxsq" 1 "men","Men","MENX[","MINIM","EN" 1 "me ne budut wypolnqtxsq?" 1 "matemati~eskoe predstawlenie." 1 "mart.dat ","MART.DAT ","EN" 1 "mandy my nakonec-to polu~ili na" 1 "mandy i funkcii:": 1 "mandu 'ukazatelx'?": 1 "manda inicializaciq oglawleniq" 1 "mali massiw?" 1 "magnitofona Wy ispolxzuete?" 1 "m ","M ","EN" 1 "lu~ili prigla{enie ";: 1 "lqtxsq predloveniq qzyka BEJSIK" 1 "lq`}ih simwolow.": 1 "low ne wliqet na rezulxtat. Po": 1 "losx pri nabore otweta na pri-" 1 "lo w q~ejke?" 1 "li~eski powtorq`tsq?" 1 "li~eski powtorq`tsq w programme" 1 "li~a`tsq raspoloveniem programm" 1 "lizirowannu` disketu w MH1:." 1 "lisx tolxko ~etnye ~isla?" 1 "lisa.dat ","LISA.DAT","CO","lisa.bas","LISA.BAS","EN" 1 "leto.dat ","LETO.DAT ","EN" 1 "leto ","LETO ","EN" 1 "lenie: u was kon~ilasx plenka." 1 "lenie programmu, adres kotoroj" 1 "le. Na diske w priwode MH1:" 1 "le desqtikratnogo pribawleniq" 1 "lawlenie):": 1 "latx w razme~ennoj diskete," 1 "kwadrate dolvna bytx bukwa 'S'.": 1 "ku dlq specifikacii fajla w od-" 1 "krywaetsq fajl w programme?" 1 "krot01.com ","KROT01.COM ","CO","krot02.com ","KROT02.COM ","EN" 1 "krossword ","KROSSWORD ","EN" 1 "kratku` komandu dlq \WM, wyra-" 1 "kotoryj posle wypolneniq opera-" 1 "kotoryh zakan~iwa`tsq simwolom" 1 "kotorye prinimaet H pri wypol-" 1 "kotorogo minutnaq strelka proj-" 1 "kopirowanie teksta iz wspomoga-" 1 "kopirowanie teksta w wyhodnoj" 1 "kopi","KOPIROWA","EN" 1 "konkretnyj disk ne ukazan?" 1 "kompx`ter movet rabotatx w dwuh revimah:neposredstwennom(revim mikrokalxkulqtora) i osnownom. w neposredstwennom revime movet wypolnqtxsq tolxko odna stroka i ona ne dolvna imetx nomera." 1 "komandu zagruzki (po-anglijski" 1 "komandu ";: 1 "komandoj ";: 1 "komanda";: 1 "komanda": 1 "komand","prikaz","ukaz","KOMAND","PRIKAZ","UKAZ","EN": 1 "kom welikowata?" 1 "kol","krug","KRUGOW","KOLXCEW","EN" 1 "kogo priwoda ~itatx programmu" 1 "kogda wwodqtsq stroki programmy,to listing otobravaetsq w werhnej polowine |krana.";: 1 "kogda minutnaq strelka projdet" 1 "kogda emu prekratitx beg?" 1 "koe ~islo tam budet teperx?" 1 "ko poka H<10 ?" 1 "klawi{u s operatorom." 1 "klawiatury?": 1 "klawiature wwodimoe ~islo?" 1 "ketoj) rabotaet sistema, esli" 1 "kete MH0 posle otrabotki ko-" 1 "ke stadiona. Dlina odnogo kruga" 1 "kazano w programme ";: 1 "kavdaq klawi{a kompx`tera ": 1 "kat","ogl","dir","KATALOG","OGLAWLEN","DIREKTOR","EN" 1 "kat","kar","KATALOG","KARTATEK","EN" 1 "kakoj koncu distancii?" 1 "kak nuvno izmenitx, ~toby nape-" 1 "kak nuvno izmenitx, ~toby wy-" 1 "kak 'razli~aet' fajly mevdu so-" 1 "kah W$ i S$ ?" 1 "k |toj ve programme" 1 "k zna~eni` uprawlq`}ej peremennoj cikla pribawlqetsq weli~ina {aga prira}eniq.esli polu~ennoe zna~enie stalo bolx{e kone~nogo zna~eniq (predela),to uprawlenie peredaetsq operatoru sledu`}emu za ";: 1 "k programme ";: 1 "k kopirowani`. Dopustim, ~to w" 1 "k ","K ","EN" 1 "izwle~enie stroki" 1 "izwle~enie simwola" 1 "izwesti s Wa{ej plenki pesn`" 1 "izobravenii klawiatury sootwet-" 1 "iz programmy ";: 1 "iz bufera stroki." 1 "iz bufera i zanesenie ego w os-" 1 "iz MH1: na kotoru` Wy tolxko" 1 "iz 2002 strok nemnovko weliko-" 1 "itx ";: 1 "ispolxzuq dlq upro}eniq" 1 "ispolxzowatx komandu ";: 1 "ispolxzowatx <SU/S> ili <SU/";: 1 "ispolnenii programmy ";: 1 "irowatx'?": 1 "invenera?" 1 "initialize." 1 "ini","INICIALI","EN" 1 "imq peremennoj ne movet sowpa- datx s imenem operatora(";: 1 "imetx wid:": 1 "imen fajlow ";: 1 "ime`}ih odno nazna~enie, nazy-" 1 "im","Im","naz","Naz","IMEN","NAZWAN","EN" 1 "im","Im","naz","IMQ","NAZWAN","EN" 1 "ili revimom w kotorom nahoditsq kompx`ter.revim otobravaetsq kursorom-merca`}ej bukwoj, ukazywa`}ej pozici`,w kotoru` budet wywoditxsq o~erednoj simwol s klawiatury.wozmovny sledu`}ie revimy: ";: 1 "ili posle" 1 "ili ";: 1 "i ~etwertoj q~eek massiwa H ?" 1 "i t.p. Opredelite po tipam," 1 "i t.d.)imq ne movet na~inatxsq s bukw";: 1 "i sohranqetsq do teh por,poka ne budet navata klawi{a ";: 1 "i skolxko programma": 1 "i preobrazuet stroku w~islo,tak";: 1 "i polu~ili" 1 "i operator 4 pe~ataet 1.": 1 "i obnowlqet pamqtx displeq.": 1 "i koli~estwo detej ";: 1 "i klawi{u s": 1 "i klawi{u s" 1 "i dorovek?" 1 "i Wy sozdaete fonoteku. Kakie" 1 "i 2. W miga`}em" 1 "i ne otpuskaq ee navmite na" 1 "i kakie dwa ~isla" 1 "i widite sledu`}ij" 1 "i na |krane displeq wy-" 1 "gruzki sistemy (WOOT) ot wersii" 1 "gruzki (tip ";: 1 "gruzitxsq operacionnaq sistema," 1 "granic segmenta redaktirowaniq." 1 "gom 0.3 . ^to nuvno postawitx" 1 "go poiska, to sna~ala wypolnq-" 1 "glijski ";: 1 "gla{eniq ";: 1 "glagolow:": 1 "glagol 'nazwatx','datx naimeno-" 1 "glagol 'kopirowatx'." 1 "glagol ","GLAGOL ","EN" 1 "garav na 100 boksow?" 1 "funkcionirowanie?" 1 "funkcij:": 1 "funkcij neobhodimo navatx kla-" 1 "funkcii)." 1 "funkcii wy~islq`tsq pered wypol-neniem l`byh operacij,no wy mo- vete izmenitx |tot porqdok,pri- menqq skobki." 1 "funkcii ili wwod w tekst upraw-": 1 "funkci`,to process prerywaetsq," 1 "fragment programmy:": 1 "formule: U=5*H+3, pri H rawnom" 1 "formaciq?" 1 "formaciq komandoj W ?" 1 "formacii na diske, esli na nem" 1 "fewralx","FEWRALX ","EN" 1 "fevr.dat ","FEVR.DAT ","EN" 1 "familiq sotrudnika, ";: 1 "familij i koli~estwo detej w" 1 "fajly iz drugoj diskety?" 1 "fajly u~itywaet programma. A" 1 "fajlow, nahodq}ihsq na diskowyh" 1 "fajlow ";: 1 "fajla ";: 1 "fajl iz bufera sohraneniq." 1 "fajl dannyh." 1 "fajl oglawleniq ne sozdaetsq." 1 "etsq za o{ibku. Kakoj tip wse-" 1 "etsq w |toj programme i skolxko" 1 "etsq w wide fajla w formate za-" 1 "etsq komandoj monitora:": 1 "etsq funkciq ";: 1 "ete, ~toby wwesti o~erednu` ko-" 1 "et na russkom qzyke?" 1 "et programma ";: 1 "esli zaranee ne izwestny zna-" 1 "esli wypolnitx: ";: 1 "esli wwesti ~islo 1" 1 "esli w ego programme mnogo raz" 1 "esli to~ek perehoda o~enx mnogo" 1 "esli to~ek perehoda nemnogo, no" 1 "esli po zaprosu \WM wwesti 2 ?" 1 "esli otwet" 1 "esli o nej net swedenij w "; 1 "esli nekotoraq klawi{a uderviwaetsq w navatom polovenii bolee,~em 2 ili 3 sekundy,to |to wyzowet powtor ee dejstwiq.wwod s klawiatury osu}estwlqetsq w nivn`` polowinu |krana. kavdyj simwol poqwlqetsq pered kursorom,sam kursor movno pereme}atx po |kranu klawi{ami:": 1 "esli my wweli trojku?" 1 "esli kompx`ter ovidaet wwod komandy ili stroki programmy.|to movet bytx w na~ale strok ili posle ";: 1 "esli 'wynesti' ob}ie mnoviteli" 1 "esli wtoroj operator budet" 1 "esli pri razmetke obnaruvatsq" 1 "esli pri" 1 "esli my" 1 "emkostx diskety?" 1 "em |togo operatora. Esli opera-" 1 "ego w bufere stroki.": 1 "ego smysl." 1 "ego movno pereme}atx nive ili wy{e,ispolxzuq klawi{i ": 1 "ee prigla{enie imeet wid '.' ?" 1 "dwe osnownye funkcii Wa{ego" 1 "dwa","2 ","DWA","EN" 1 "dw","DW","2 ","EN" 1 "dw","2 ","DWA ","EN" 1 "du`}ij wid:": 1 "du operatorami ";: 1 "dorovki, na kotoroj razme}aetsq" 1 "dolvna priostonowitx wypolnenie" 1 "dolven wypolnqtxsq" 1 "dnaq strelka ~asow, za wremq," 1 "dlq |toj ve programmy" 1 "dlq |toj programmy?" 1 "dlq wyhoda": 1 "dlq sis-" 1 "dlq \WM SEWER:": 1 "dlq DWK." 1 "dlq |krannogo redaktirowaniq" 1 "dlq uskoreniq raboty komand" 1 "dlq 'numeruemyh' peremennyh H" 1 "dliny okruvnosti - ";: 1 "dlinu slowa S$" 1 "dlina ego {aga 1 metr?" 1 "dite, ~toby \WM 'ponqla', s ka-" 1 "displeq?" 1 "displej","monitor","terminal","|kran","DISPLEJ","MONITOR","TERMINAL","\KRAN","EN" 1 "displej sodervaniq fajla" 1 "diskety, pokazannyj w perwom" 1 "diskety programmoj ";: 1 "disketu w priwode MH1:. Wweli" 1 "disketu MH0:": 1 "diskete tekstowyh fajlow (so-" 1 "diskete MH0, esli budet wwedena" 1 "diskete MH0 ?" 1 "diskete MH1 posle wypolneniq" 1 "diskete 'komandnyh' fajlow" 1 "disketa tolxko s operacionnoj" 1 "diske otkroetsq fajl ";: 1 "diska? (do 3 bukw)." 1 "dis","DISK","EN" 1 "diagramma, izobravennaq w 3." 1 "di: odnu s nerazme~ennymi lis-" 1 "detej.'": 1 "det imetx wid:": 1 "det 5 delenij?" 1 "des","DES","10 ","EN" 1 "derva}ih tekstowu` informaci`)?" 1 "dervanie fajla dlq wizualxnogo" 1 "dervanie fajla ";: 1 "dennogo posredstwom kontekstno-" 1 "delaet funkciq ";: 1 "dejstwu`t kak ";: 1 "dejstwiq w sootwetstwii s funk-" 1 "dejstwiq neobhodimy dlq podgo-" 1 "dejstwie."; 1 "defektnye bloki?" 1 "data ","DATA ","EN" 1 "dat","Dat","DAT ","EN" 1 "darq operatoru 5 ( perehod na" 1 "dannyh na disk nuvno ukazatx" 1 "da`tsq 6 sektorow po 40 dorovek" 1 "da","budet","kone~no","DA","BUDET ","KONE^NO ","OBQZATELXNO ","EN" 1 "da pojdet 'abiturient Petrow' ?" 1 "d","D","EN" 1 "d ","D ","EN" 1 "copy mx1:*.dat mx0: ","COPY MX1:*.DAT MX0: ","EN" 1 "copy ","COPY ","EN" 1 "clock ","CLOCK ","EN" 1 "cionalxnymi wozmovnostqmi |k-" 1 "cikli~eski?" 1 "cikla? (Napisatx operator pol-" 1 "cifikaci` fajla w formate ";: 1 "celaq stroka movet bytx udalena wwodom nomera udalqemoj stroki i posledu`}im navatiem klawi{i ";: 1 "by dlq \WM razre{enie prodol-" 1 "by na diskete MH0 oni imeli" 1 "by na diskete M 1 "bukwa 'S'.": 1 "bukw putem odnowremennogo nava-" 1 "bufera sohraneniq 512 simwolow)": 1 "budut wypolnqtxsq w |toj prog-" 1 "budet: ";: 1 "budet w q~ejke?" 1 "budet perhod na operator 7, a" 1 "budet imetx wid: ";: 1 "bravennogo na displee, widno," 1 "bravenie?" 1 "botatx' naimenx{ee koli~estwo" 1 "bora teksta, neobhodimo wwesti" 1 "boj sistema u~eta diskowoj pa-" 1 "bloknota wladelec bloknota za-" 1 "biratesx |to sdelatx? Napi{ite" 1 "biraemaq operatorom po velani`." 1 "binacij klawi{ ";: 1 "bez sohraneniq otkrytyh fajlow" 1 "bevit do 60-ti metrowoj otmetki" 1 "bevit distanci` 60 metrow, esli" 1 "bevit 60 metrow, esli dlina ego" 1 "bevatx soob}enie ob o{ibke?" 1 "bevatx ne ot na~ala, a ot 30-ti" 1 "basicles" 1 "ball wy{e 4.7, to projdite na" 1 "az1.cod2" 1 "az1.cod1" 1 "astr.fnt" 1 "argumenta w operatore 2 ?" 1 "arbuz","bo~ka","wilka","glaz","dom","elx","veludx","zabor","igla","jod","kit","list","most","nov","okno","plita","ryba","stol" 1 "animalsm" 1 "anglijski frazu 'sotrite sim-" 1 "a w kakoj- nowoe?" 1 "a navatie cifrowoj klawi {i s klawi{ej 1 "a movno sokra}enno: ": 1 "`}ih wnutrenn`` i naruvnu` po-" 1 "`tsq operatory 3, 4, 5, blago-" 1 "^to wy~islqet programma ";: 1 "^to qwlqetsq argumentom funkcii" 1 "^to proizo{lo s predydu}im zna-" 1 "^to proizo[lo s ~islom 5 w": 1 "^to polu~itsq w q~ejke K%, esli" 1 "^to ozna~aet razli~ie ";: 1 "^to otme~aet znak $ pri imenah" 1 "^to otme~aet znak % pri imeni" 1 "^to nuvno wwesti, ~toby posle" 1 "^to nuvno sdelatx programmistu," 1 "^to nuvno otwetitx, ~toby na-" 1 "^to nuvno izmenitx w operatore" 1 "^to nuvno sdelatx hudovniku -" 1 "^to neobhodimo sdelatx w prog-" 1 "^to nape~ataet |ta programma?" 1 "^to nape~ataet tretij operator" 1 "^to nape~ataet operator": 1 "^to nape~ataet operator s met-" 1 "^to nape~ataet operator 7 prog-" 1 "^to nape~ataet operator 5 prog-" 1 "^to nape~ataet operator 3 prog-" 1 "^to nape~ataet operator ";: 1 "^to my oby~no dolvny peremno-" 1 "^to i kak preobrazuet funkciq" 1 "^to dolvno bytx zaprogrammiro-" 1 "^to dolven znatx Fedorow, ~toby" 1 "^to dolven znatx Fedorow, ~ 1 "^to delaet perwyj operator \tih": 1 "^to delaet operator priswaiwa-" 1 "^to delaet operaciq + w prog-" 1 "^to delaet \WM, wypolnqq opera-": 1 "^to realizuet |ti wozmovnosti?" 1 "^to proishodit pri wypolnenii" 1 "^to delaet poslednqq komanda" 1 "^to Wy popytaetesx sdelatx," 1 "^to delaet wtoroj operator": 1 "^to nape~ataet operator" 1 "^emu rawen {ag peremennoj K w" 1 "^emu rawen H(7) ?" 1 "^emu rawen H(6) ?" 1 "^emu rawen H(4) ?" 1 "^emu rawen H(3) ?" 1 "^emu rawna M w programme" 1 "^emu budet rawno ";: 1 "^em otli~a`tsq rezulxtaty rabo-" 1 "^em otli~a`tsq razli~nye wersii" 1 "^em otli~aetsq li~nyj garav" 1 "^asy i minuty:";d$ 1 "^TO TAKOE QZYK, NAPRIMER, RUS-" 1 "^TO TAKOE KOMANDA ?" 1 "^TO TAKOE INSTRUKCIQ PO POLXZO-" 1 "^TO DAET KOMANDIR WO WREMQ BOQ" 1 "^ETWERG': ";: 1 "^ELOWEK","PROGRAM","POLXZ","EN" 1 "\ti programmy dela`t odinakowye" 1 "\ti fajly ime`t tipy ";: 1 "\ta programma rabotaet. Za~em" 1 "\WM s~itaet bystree ~eloweka?" 1 "\WM ranx{e wmesto displeq?" 1 "\WM imeet dwa diskowyh priwoda" 1 "\WM SEWER funkciq wy~isleniq" 1 "[irota (5 cifr):";d$ 1 "[ERENGA'";: 1 "[","{","6 ","EN" 1 "Zna~it, spisok #1, spisok #2" 1 "Zna~it, ";: 1 "Zna~eniq kakoj peremennoj nape-" 1 "Zna~enie H rawno 5. ^emu budet" 1 "Za~em w programmirowanii pridu-" 1 "Za~em programme imq?" 1 "Za~em oni togda nuvny?": 1 "Za~em nuvna takaq programma?" 1 "Zapi{ite prawilxno operator 5 w" 1 "Zanesenie teksta w" 1 "Zafiksirujte nabor zaglawnyh" 1 "Za skolxko {agow sportsmen do-" 1 "Za kakoe wremq \WM movet wypol-" 1 "ZIKL5 ";: 1 "ZIKL3 ";: 1 "ZIKL2 ";: 1 "ZAMENA.": 1 "Z ";: 1 "Ynvar|",8 1 "X(8)->64": 1 "X(7)->49": 1 "X(6)->36": 1 "X(5)->25": 1 "X(4)->16": 1 "X(3)->9": 1 "X(2)->4": 1 "X(1)->1": 1 "Wypolnqq operator wwoda, \WM" 1 "Wypiska iz slowarq:": 1 "Wyberem iz ukazatelq ob'ekt" 1 "Wy ~itaete stranicu ukazatelq w" 1 "Wy zagruzili operacionnu` sis-" 1 "Wy uwereny? (D/N)-->"; 1 "Wy nahoditesx w westib`le firmy" 1 "Wy dolvny bezo{ibo~no wwoditx" 1 "Wy wweli perwyj simwol ";: 1 "Wy neposredstwenno pristupaete" 1 "Wweite operator opisaniq funk-" 1 "Wwedite simwol'": 1 "Wwedite operatory w stroke 16" 1 "Wwedite operator w stroke 17" 1 "Wwedite operator w stroke 15" 1 "Wwedite operator opisaniq funk-" 1 "Wwedite nomer funkcii'": 1 "Wwedite l`boe ~islo'": 1 "Wwedite komandu-->": 1 "Wwedite koli~estwo knig'": 1 "Wwedite imq kartoteki-->"; 1 "Wwedite e}e simwol'": 1 "Wwedite argument'": 1 "Wwedite operator opisaniq fun-" 1 "Wwedem komandu ";: 1 "Wtoroe dejstwie." 1 "Wstawxte nedosta`}ij operator" 1 "Wspomnim, ~to 'Pisatx' po- an-": 1 "Wsego u sotrudni-": 1 "Wozwrat po-anglijski ";: 1 "Wozobnowlenie raboty" 1 "Wozmovno li w matematike ra-" 1 "Wozmoven li bystryj poisk in-" 1 "Wnimatelxno razberite sledu`}u`" 1 "Wersii operacionnyh sistem raz-" 1 "Wa{a programma delaet slovnye" 1 "Wam predlovili dwe ob}ih tetra-" 1 "Wam ne kavetsq, ~to programma" 1 "WY^ITANIE'": 1 "WYREZ","WYDWL","OTDEL","OTREZ","EN" 1 "WYBOR ";: 1 "WWOD (";: 1 "WWEDITE RADIUS'": 1 "WWEDITE POQS'": 1 "WWEDITE NOMER FUNKCII'": 1 "WWEDITE KOD DEJSTWIQ'": 1 "WWEDITE DANNYE'": 1 "WTORNIK': ";: 1 "WREMQ","EN" 1 "WOWA, ";: 1 "WA[A OCENKA- ";S/29 1 "WA[A OCENKA- ";S/36 1 "WA[A OCENKA- ";S/26 1 "WA[A OCENKA- ";S/25 1 "WA[A OCENKA- ";S/20 1 "WANI@ BYTOWYM PRIBOROM, NAPRI-" 1 "W$ i S$ ?" 1 "W ~em otli~ie priswaiwaniq ot": 1 "W ~em Wy" 1 "W |tom operatore ne ukazan tip" 1 "W spiske estx glagol 'Pe~atatx'" 1 "W programme beskone~no powtorq-" 1 "W processe wypolneniq programma": 1 "W miga`}em kwadrate dolvna po-" 1 "W magazine kancelqrskih towarow" 1 "W kakom e}e slu~ae programmistu" 1 "W kakom bloke zagotowleny imena" 1 "W kakom bloke \WM hranitsq in-": 1 "W kakie stepeni movet wozwoditx" 1 "W dannom razdele w kwadratnyh" 1 "W \WM sna~ala wy~islqetsq arif-" 1 "W Bejsike estx wozmovnostx za-" 1 "W programme ";: 1 "W programme ";: 1 "W kakom meste nuvno dobawitx" 1 "W kakoj ~asti diska hranqtsq" 1 "W kakoj ~asti 'rawenstwa' w" 1 "VOVA ";: 1 "VALUE ";: 1 "U~itywa`t li programmy zagruzki" 1 "Uspeet li za |to wremq ~elowek" 1 "Uprostim komandu kopirowaniq:": 1 "Ukavite koli~estwo": 1 "Ukavite perwye tri zna~eniq," 1 "Udobna li takaq fotokopiq?" 1 "Udalenie zadannogo" 1 "Udalenie informacii" 1 "U telefonnoj budki stoit o~e-" 1 "U dweri priemnoj komissii wisit" 1 "Tretxe dejstwie?" 1 "Teperx wernemsq k zada~e kopi-" 1 "Teperx imeem programmu:": 1 "Telefon Sergeewa: 13-42-55.": 1 "Telefon Sergeewa 'T": 1 "Telefon Sergeewa 134255" 1 "TYPE, PRINT, COPY) ?": 1 "TYPE MX0:RODIN.TXT" 1 "TYPE MX0:ROBIN.DAT" 1 "TRENAVER NABORA OPERATOROW, KO-" 1 "TIME 11:35:45": 1 "THREE ";: 1 "THE SYMBOL X', ";: 1 "TESTMX.SAV ";: 1 "TESTMX ": 1 "TESTMX ";: 1 "TESTMX ";: 1 "TELETYPE": 1 "Summa='";: 1 "Srawnite sledu`}ie dwa protoko-" 1 "Srawnim dwe programmy na qzyke" 1 "Sproektiruem funkci` dlq ras~e-" 1 "Sportsmen bevit 5-ti kilometro-" 1 "Sowpadaet li imq artista s ime-" 1 "Sotrudnik '";: 1 "Sostawte programmu, kotoraq nu-" 1 "Sopostawim dejstwiq algoritma i": 1 "Soob}il li ";: 1 "Sokra}enie SPCFL ozna~aet spe-" 1 "Sokratite wyravenie ";: 1 "Sledu`}aq komanda kopiruet fajl" 1 "Skrolling (bystroe probeganie" 1 "Skopiruetsq li programma WOOT" 1 "Skonstruirujte weroqtnyj pere-" 1 "Skolxko zna~enij ";: 1 "Skolxko zna~enij H hranitsq w" 1 "Skolxko zapisej wywedet na |k-" 1 "Skolxko zapisej na |toj stra-" 1 "Skolxko wsego programm na |toj" 1 "Skolxko wsego blokow sostawlqet" 1 "Skolxko stalo deneg w q~ejke?" 1 "Skolxko rekwizitow w zapisi" 1 "Skolxko raznyh imen peremennyh" 1 "Skolxko raz wypolnitsq operator": 1 "Skolxko q~eek pamqti dlq nabora" 1 "Skolxko q~eek pamqti zanimaet" 1 "Skolxko operatorow cikla budet" 1 "Skolxko funkcij nuvno opisatx" 1 "Skolxko fajlow na diskete MH0:?" 1 "Skolxko delenij projdet sekund-" 1 "Skolxko delenij projdet sekun-" 1 "Skolxko ~isel budet nape~atano" 1 "Skolxko ~isel nape~ataet |ta" 1 "Skolxko zna~enij ";: 1 "Skolxko strok programmy ";: 1 "Skolxko operatorow programmy" 1 "Skolxko wsego operatorow w" 1 "Skolxko operatorow ";: 1 "Skolxki indiwidualxnym garavam" 1 "SYMBOLS ?" 1 "SWOIM BOJCAM ?" 1 "SUBROUTINE, ";: 1 "SUBROUTINE": 1 "SUBROUTINE ?" 1 "STRONCIJ ?" 1 "STRING ";: 1 "STEP 0 ?" 1 "START, ";: 1 "SS" TO NEXT PAGES 1 "SREDA': ";: 1 "SPISOK, ";: 1 "SPISOK ";: 1 "SPCFL/S - sozdanie fajla ": 1 "SPCFL/";: 1 "SPCFL - redaktirowanie fajla ": 1 "SPCFL ili NOWAQ SPCFL=STARAQ": 1 "SOLDAT NOMER'K": 1 "SLOVENIE'": 1 "SKIJ ILI ANGLIJSKIJ- DLQ ^EGO " 1 "SINUS ";: 1 "SIN(K) ";: 1 "SIMWOLY NE ODINAKOWY'": 1 "SIMWOLY ODINAKOWY'": 1 "SEGMENT ";: 1 "S kakoj disketoj (aktiwnoj dis-" 1 "S kakoj celx` numeru`tsq koman-": 1 "S kakogo nomera na~inaetsq pod-" 1 "S kakogo mesta diska ili lenty" 1 "Re~x idet wse o toj ve diskete" 1 "Rezulxtat=';S": 1 "Redaktor prednazna~n dlq priob-" 1 "Red ";: 1 "Razli~aetsq li sodervimoe q~eek" 1 "Rassmotrim pustu` q~ejku kassy" 1 "Rassmotrim programmu na Bejsike" 1 "Rassmotrim operator": 1 "Radius?'": 1 "RUN TESTMX ";: 1 "ROWANIQ NA \WM ?" 1 "ROUTINE." 1 "ROUTINE, ";: 1 "ROUTINE ?" 1 "ROUTINE -";: 1 "ROUTINE ";: 1 "ROUTINE ";: 1 "ROST.DAT, PROBA.DAT" 1 "ROST .BAS 8 13-Jul-88": 1 "RODIN.TXT - ";: 1 "RODIN.TXT ";: 1 "ROBIN.DAT - ";: 1 "ROBIN, ";: 1 "ROBIN, ";: 1 "RITA.BAS" 1 "REZULXTAT=';S": 1 "REZULXTAT='";: 1 "REX2.BAS ?" 1 "REX1.BAS ";: 1 "REX.BAS ";: 1 "RETURN.": 1 "RETURN ";: 1 "RETURN ";: 1 "RETURN ";: 1 "RESTORE, ";: 1 "RESTORE ?" 1 "REN MX1:LUNA.COM MX1:LIZA.COM" 1 "RAZME^EN","PRONUMER","WTORAQ","EN" 1 "RAS^ETNYE FORMULY DLQ KRUGA I SFERY:'": 1 "RADIUS? TOL]INA? UD.WES?'": 1 "RADIUS*RADIUS*RADIUS/3" 1 "QUIT. ": 1 "QNWARX','FEWRALX','MART'": 1 "Q*4*PI*(R*R*R-(R-D)*(R-D)*(R-D))/3","EN" 1 "Pustx okruvnostx s radiusom W" 1 "Pustx nekotoraq programma imeet" 1 "Proizwedite ot slowa ";: 1 "Programmu sleduet prodolvitx" 1 "Programma rabotaet prawilxno," 1 "Programma rabotaet praw 1 "Programma ";: 1 "Programma ";: 1 "Prodolvaem rabotatx s disketoj" 1 "Primer: 3 ";: 1 "Prigla{eniem redaktora qwlqetsq" 1 "Priblizitelxno wo skolxko raz" 1 "Pri rabote |tot fragment prog-" 1 "Pri kakom zna~enii K budet 'ra-" 1 "Pri kakom K w na~alxnoj pokazan-" 1 "Preduprevdenie:powtor-" 1 "Preduprevdenie: prery-" 1 "Po~emu?": 1 "Po~emu, poka H 1 "Po~emu w operatore 2 programmy" 1 "Po~emu w operatiwnoj pamqti \WM" 1 "Po~emu programma nape~ataet 0 ?" 1 "Po~emu poslednee wyravenie gro-" 1 "Po~emu neobhodim operator w" 1 "Po~emu nape~ataet odno ~islo?" 1 "Po~emu imena argumentow w ope-" 1 "Po~emu Alekseew otkryl fajl" 1 "Pozicioniruet ";: 1 "Potomu ~to w |toj programme A" 1 "Postawitx posle wtorogo opera-" 1 "Posmotrite spisok anglijskih": 1 "Poslednee dejstwie?" 1 "Posle wypolneniq poslednej ko-" 1 "Posle prigla{eniq wwedite stro-" 1 "Posle nekotoryh dopolnenij na-" 1 "Posle dannoj funkcii razre{aet-" 1 "Posle |togo navmite na WWOD." 1 "Posle wypolneniq komandy ";: 1 "Posle skolxki prohodow cikla" 1 "Porqdok raboty s redaktorom." 1 "Polu~iw nomer priwoda, program-" 1 "Podwedem e}e odin malenxkij" 1 "Po- anglijski 'Pustx on bevit'" 1 "Po okon~anii wwoda ~elowek dol-" 1 "Po komande ";: 1 "Plo}adx kruga=';";: 1 "Plo}adx kolxca=';R": 1 "Planeta Viznennyj princip 1 "Pere~islite, summa kakih zna~e-" 1 "Perewedite na russkij qzyk ope-" 1 "Perewedite na anglijskij, is-" 1 "Perewedite na anglijskij qzyk" 1 "Perepe{ite obe programmy:": 1 "Pered Wami programma i q~ejka" 1 "PROST.DAT ?" 1 "PROBA.DAT,": 1 "PRINT-";: 1 "PRINT","A$(3) ","EN" 1 "PRINT Z, ": 1 "PRINT Z ";: 1 "PRINT X ";: 1 "PRINT S ";: 1 "PRINT MX0:ROBIN.DAT" 1 "PRINT ?": 1 "PRINT ";: 1 "PRINT ","EN": 1 "PREWOSHODNO","OTLI^NO","HORO[O","SREDNENXKO","SLABOWATO","NE GODITSQ","NE WERNO" 1 "PREWOSHODNO","OTLI^NO","HORO[O","SREDNENXKO","SLABOWATO","NE GODITSQ","NE PRAWILXNO" 1 "PRAWILXNYJ OTWET:": 1 "PQTNICA'": 1 "PQT","pqt","5 ","EN" 1 "PONEDELXNIK'" 1 "POKAZATELX ?": 1 "PLO]ADX KRUGA'": 1 "PLACE>.": 1 "PETROGRAD." 1 "PETROGRAD'": 1 "PAROWOZ ?" 1 "Otwetxte, kak najti glawnogo" 1 "Otwet: iz oglawleniq diska." 1 "Otmena prigla{eniq" 1 "Otkuda sistema uznaet teku}u`" 1 "Otkuda sistema znaet to~noe" 1 "Otkuda Bejsik znaet teku}ee" 1 "Ot operatorow s kakimi metkami" 1 "Ot kogo \WM polu~aet zna~enie" 1 "Opredelqet, kakie simwoly kodi-" 1 "Opredelenie stranic w sootwet-" 1 "Opi{ite w operatore 3 funkci`" 1 "Opi{ite w operatore 2 funkci`" 1 "Opi{em |ti dejstwiq dlq \WM po-": 1 "Opisaniq funkcij na~ina`tsq s" 1 "Operatory s kakimi metkami cik-" 1 "Operatory s kaimi metkami ne" 1 "Operatory 5 i 6 budut wypol-" 1 "Operator smetkoj 2, wmesto:": 1 "Operator s metkoj 2 kavdyj raz" 1 "Operator perehoda: ";: 1 "Operator 4 programmy ";: 1 "Okon~atelxnyj wid programmy:": 1 "Okon~atelxno imeem programmu": 1 "Odnowremenno navmite i otpustite": 1 "Odnako ve sistema s |toj diske-" 1 "Ob'em sfery = 4*";: 1 "Ob'edinim programmu i podprog-" 1 "OTWET: Nomer sektora i adres" 1 "OTWET: ";: 1 "OTWET PRAWILXNYJ ?" 1 "OSNOWANIE ?": 1 "ON SLUVIT ?" 1 "ON N GOTO..." 1 "OB'EM SFERY'": 1 "Nuvno navatx ";: 1 "Nowosibirskij"," Regionalxnyj"," \ksperimen-","talxnyj Centr"," Informatiki" 1 "Nomer zamenqemoj stroki-->";N 1 "Nomer rabo~ego dnq?'": 1 "No wedx posle formatirowaniq": 1 "Nikak, |to wsegda na~alo diska:" 1 "Ne budet li programma, soderva-" 1 "Na~alo programmy ~teniq fajla" 1 "Nazowem nekotoru` q~ejku pamqti" 1 "Naprimer, kogda oni ne zada`tsq" 1 "Napi{ite programmu sloveniq" 1 "Napi{ite podprogrammu wy~itaniq" 1 "Napi{ite podprogrammu umnoveniq" 1 "Napi{ite programmu, wy~islq`-" 1 "Napi{ite podprogrammu deleniq" 1 "Napi{ite operator 5, kotoryj" 1 "Napi{ite operator 4, kotoryj" 1 "Nape~atatx (y/n):";s$: 1 "Nape~ataet li programma ";: 1 "Na kavdoj storone diskety prog-" 1 "Na kakom operatore \WM ostano-" 1 "Na kakoe ustrojstwo personalx-" 1 "Na o~erednoj ~istoj stranice" 1 "Na kakom diske Bejsik budet" 1 "NUMBERS ?" 1 "NOMER SEZONA ?'": 1 "NOMER MESQCA ?'": 1 "NOMER FAJLA ?'": 1 "NEXT K ";: 1 "NAME2 ";: 1 "N","n","0 ","EN" 1 "N (sewer) ili S (`g):";d$ 1 "My widim na |krane sledu`}ij" 1 "Movno li, posmotrew 2 sekundy" 1 "Movno li sdelatx w bloknote za-" 1 "Movno li na magnitofone wospro-" 1 "Mesqc (ciframi):";d$ 1 "MX1:ROST.DAT": 1 "MX1:PROST.DAT": 1 "MX1:PROBA.DAT. ";: 1 "MX1:PROBA.BAS": 1 "MX1:KROT02.COM": 1 "MX1:KROT01.COM": 1 "MX1: PROST.DAT": 1 "MX1: PROBA.DAT": 1 "MX1: PROBA.BAS": 1 "MX1: KROTO2.COM": 1 "MX1: KROTO1.COM": 1 "MX1","EN" 1 "MX0:TUKTUK.PAS MX0:ROBIN.DAT" 1 "MX0:STRUNA.BAS": 1 "MX0:STOK.COM": 1 "MX0:SILA.COM MX1:LISA.BAS" 1 "MX0:SCOONS.COM MX0:FUKS.BAS" 1 "MX0:ROBERT.COM MX0:RITA.BAS" 1 "MX0:MOUSE.PAS MX0:ELSA.TXT" 1 "MX0:MARS.COM": 1 "MX0:LUNA.COM MX1:LIZA.DAT" 1 "MX0:LISA.DAT": 1 "MX0:LISA.BAS": 1 "MX0:LIDIJA.BAS MX0:RODIN.TXT" 1 "MX0:KROT.COM": 1 "MX0:KREST.COM": 1 "MX0: SPISOK.DAT": 1 "MX0: MOST.BAS": 1 "MX0: LIPA.TXT": 1 "MKKKKKN","AQ CA","Ar EA","Ao FA","Aa DA","Am GHA","OKKKKKP": 1 "MKKKKKKKKKKKKKKN","A pokavi bukwy A","Aposlu{aj slowaA","A pokavi slowa A","A napi{i slowa A","OKKKKKKKKKKKKKKP": 1 "MKKKKKKKKKKKKKKKKKKKN","A 1 "MH1: wtoroj |kzemplqr operaci-" 1 "MH1: imeetsq polnaq operacion-" 1 "MH1: polnocennu` operacionnu`" 1 "MH1. Wy wweli komandu:": 1 "MH1. Napi{ite komandu kopirowa-" 1 "MH1 posle wypolneniq komandy": 1 "MH0: w tolxko ~to otformatiro-": 1 "MH0: Wy wweli w sistemu komandu" 1 "MH0. Kuda budet wywedeno soder-" 1 "MH0. Kuda budet wywedeno so-" 1 "MESYATS, ";: 1 "MER, TELEWIZOROM ?" 1 "MAX ";: 1 "MASSIV ?" 1 "MASSIV ";: 1 "MAND, FUNKCIJ.": 1 "LET","W=FN","S(V)","EN" 1 "LET","W=FN","K(V):","GO TO","18 ","EN" 1 "LET","M=FN","W(R,D,Q) ","EN" 1 "LET","M=12-N ","EN" 1 "LET","HE","WRITE","EN": 1 "LET","D=LEN","C$ ","EN" 1 "LET","C$=A$+B$ ","EN" 1 "LET X=X+1 ?" 1 "LET X=2": 1 "LET X=12","LET A=18","PRINT A","PRINT B","INPUT E","INPUT T","RETURN","GO SUB 1000","GO SUB 2100","NEXT J","NEXT M","GO TO 15","GO TO 28","STOP","FOR X=3 TO 10 STEP 2","FOR A=1 1 "LET ","Y=SIN","(Z) ","EN" 1 "Kto zatem okazywaetsq w budke?" 1 "Kopirowanie programmy WOOT dlq" 1 "Komanda prinqta. Dalee Wy polu-" 1 "Komanda ";: 1 "Kogda wypolnitsq operator ";: 1 "Kogda programmist movet ispolx-" 1 "Kazalosx by, teperx u Was na" 1 "Kaku` stroku udalitx-->";N 1 "Kakowy imena argumentow funkcij": 1 "Kakomu wremeni |to sootwetstwu-" 1 "Kakomu widu bega sportsmena so-" 1 "Kakoj smysl operatora H=H+1 w" 1 "Kakoj simwol kodiruetsq ~islom" 1 "Kakoj simwol kodiruetsq w \WM" 1 "Kakoj operator |toj programmy i" 1 "Kakoj operator zapisywaet fami-" 1 "Kakoj operator s~itywaet perwoe" 1 "Kakoj operator programmy uspe{-" 1 "Kakoj operator programmy i kak" 1 "Kakoj operator programmy 'WOWA'": 1 "Kakoj operator programmy ";: 1 "Kakoj operator programmy budet" 1 "Kakoj operator nuvno dobawitx k" 1 "Kakoj operator i kak nuvno iz-" 1 "Kakoj operator budet wypolnqtx-" 1 "Kakoj operator \toj ve program-" 1 "Kakoj operator w programme i" 1 "Kakoj operator priswaiwaniq w" 1 "Kakoj nomer stroki pozicioniru-" 1 "Kakoj mar{rut u kolesa, kogda" 1 "Kakoj komandoj movno pereimeno-" 1 "Kakoj iz operatorow |toj prog-" 1 "Kakoj fajl budet obrabatywatxsq" 1 "Kakoj fajl budet ~itatx prog-" 1 "Kakoj date |to sootwetstwuet na" 1 "Kakoj apparat ispolxzowalsq w" 1 "Kakoj operator nuvno dobawitx" 1 "Kakoj iz operatorow programmy" 1 "Kakoj frazoj movno wyrazitx" 1 "Kakoj drugoj operator i kak" 1 "Kakoj operator programmy" 1 "Kakogo tipa dannye mogut soder-" 1 "Kakoe ~islo budet nape~atano ?" 1 "Kakoe zna~enie priswoetsq q~ej-" 1 "Kakoe poslednee ~islo nape~ata-" 1 "Kakoe iz sostoqnij Wy ispolxzu-" 1 "Kakoe imq polu~it w itoge sko-" 1 "Kakoe \to budet ~islo?" 1 "Kakoe imq polu~aet fajl #1," 1 "Kakoe dejstwie wypolnit \WM," 1 "Kakim simwolom monitor sistemy" 1 "Kakim mestoimeniem movno wyra-" 1 "Kakim budet ~etwertoe dejstwie?" 1 "Kakim operatorom w programme" 1 "Kakie ~isla nape~ataet |ta pro-" 1 "Kakie ~isla nape~ataet \ta prog-": 1 "Kakie ~isla nape~ata`t program-": 1 "Kakie ~isla dolvny stoqtx wmes-" 1 "Kakie zna~eniq budet prinimatx" 1 "Kakie tri ~isla nape~ataet |ta" 1 "Kakie tri ~isla nape~ataet |ta programma?" 1 "Kakie simwoly kodiru`tsq ~isla-" 1 "Kakie operatory w |toj program-" 1 "Kakie operatory w programme ";: 1 "Kakie operatory programmy cik-" 1 "Kakie operatory cikli~eski po-" 1 "Kakie operatory dolvny stoqtx" 1 "Kakie nowye fajly poqwqtsq na" 1 "Kakie fajly ostanutsq na diske-" 1 "Kakie fajly ostanutsq na |toj" 1 "Kakie fajly budut na |toj ve" 1 "Kakie fajly ostanutsq na dis-" 1 "Kakie dwa otli~iq w sintaksise" 1 "Kakie ~isla sleduet priswoitx" 1 "Kakie fajly budut na diskete" 1 "Kakie operatory powtorq`tsq" 1 "Kakaq peremennaq sootwetstwuet" 1 "Kakaq komanda wypolnit wyborku" 1 "Kakaq informaciq, kasa`}aq, na-" 1 "Kakaq bukwa sodervitsq w q~ej-" 1 "Kak |to otravaetsq na strukture" 1 "Kak zawisit adres programmy za-" 1 "Kak zapisatx slowo 'teletajp'" 1 "Kak wy~islitx sinus ot argumen-" 1 "Kak wy dumaete, WA[": 1 "Kak wy dumaete, skolxko q~eek" 1 "Kak widno, |tot" 1 "Kak ve Wy budete nahoditx nuv-" 1 "Kak uznatx, dejstwitelxno li w": 1 "Kak sohranitx informaci` o sot-" 1 "Kak sistema uznaet adres fajla" 1 "Kak nuvno izmenitx operator s" 1 "Kak napisatx na qzyke Bejsik": 1 "Kak najti swedeniq o gostinicah" 1 "Kak movet wyglqdetx kratkaq ko-" 1 "Kak komandy raspoloveny w prog-": 1 "Kak dolvna dejstwowatx \WM, wy-" 1 "Kak budet wyglqdetx operator s" 1 "Kak budet wyglqdetx na Bejsike" 1 "Kak budet wyglqdetx komanda ko-" 1 "Kak budet wyglqdetx wyravenie," 1 "Kak budet po-anglijski 'inici-" 1 "Kak budet po- anglijski 'Pe~a-": 1 "Kak Wy polagaete, kakoj opera-" 1 "Kak Wy dumaete, movet li pri" 1 "Kak Wy dumaete, imeetsq li w" 1 "Kak Wy dumaete Wa{,": 1 "Kak uznatx, dawno li sozdan" 1 "Kak skazatx po- anglijski": 1 "Kak razli~a`tsq mevdu soboj" 1 "Kak opredelitx nali~ie w |tom" 1 "Kak nazywaetsq ime`}ijsq na" 1 "Kak nazwatx po-anglijski ko-" 1 "Kak by Wy nazwali pe~ata`]ee" 1 "Kak budet po-anglijski slowo" 1 "Kak nado izmenitx operator" 1 "Kak budet wyglqdetx {estaq" 1 "KWARTAL-1 ";: 1 "KROSS.SAV ";: 1 "KROSS .SAV 11 19-Apr-89" 1 "KOLTSO ";: 1 "KNIG'+";: 1 "KAK WY DUMAETE,WA[": 1 "K, izmenq`}emsq ot 0 do 6 s {a-" 1 "K kakomu ~islu pribawlqetsq 1 ?" 1 "K -nomer soldata." 1 "K - okon~anie raboty": 1 "Izwle~enie segmenta" 1 "Izwle~enie segmenta" 1 "Izwestny ob'emy sfer, obrazau-" 1 "Izu~ite zakonomernostx izmene-" 1 "Izmenim programmu:": 1 "Iz slowarq: ";: 1 "Iz sledu`}ego 'protokola', oto-" 1 "Iz simwolxnogo predstawleniq w" 1 "Itak, wes obolo~ki = ";: 1 "Itak, nabor zapisej na diske," 1 "Itak, kopiruemaq operacionnaq" 1 "Isprawnaq personalxnaq \WM" 1 "Ispolxzuq {ablon-frazu ";: 1 "Ishodnye dannye dlq q~eek A i W" 1 "Imena kakih fajlow poqwqtsq w" 1 "Imeetsq disketa MH0 so sledu`-" 1 "Imeetsq disketa MH0. Wwedq w" 1 "Imeem dwa operatora iz raznyh" 1 "Imeem disketu s fajlami. Kak" 1 "Imeem disketu MH0, soderva}u`" 1 "Imeem posledowatelxnostx dwuh" 1 "Imeem na Bejsike sledu`}u`" 1 "Ime`tsq diskety MH0 i MH1 so" 1 "IZ ^EGO SOSTOIT PROGRAMMA DLQ": 1 "INPUT","CO","k ","K ","EN" 1 "INI","EN" 1 "IMQ=BORIS ","EN" 1 "IF.., ";: 1 "I17.FAV B 1 "HELP> ";: 1 "H: 0, 1, 2, 3, 4 ?" 1 "H, kogda wypolnitsq wtoroj ope-" 1 "H, kogda wypolnitsq tretij" 1 "H(K), gde H(K)=";: 1 "Gde razme}aetsq interpretator" 1 "Gde nuvno postawitx operator" 1 "Gde bibliotekarx hranit wse" 1 "GUESS, ";: 1 "GO","TO ","SUB","ROUTINE ","EN" 1 "GO TO- ";: 1 "GO TO X": 1 "GO TO 3,": 1 "GO TO 10" 1 "GO SUB 10 ";: 1 "GO SUB ";: 1 "GO ","SUB ","EN" 1 "GLAGOL ?" 1 "Funkciq ";: 1 "Format ukazatelq (oglawleniq)" 1 "Formalxno |to prawilxno, no ne" 1 "Fajl ";: 1 "FUNKCII:'": 1 "FOUR ";: 1 "FOR........NEXT." 1 "FOR,GOTO";: 1 "FOR OUTPUT": 1 "FOR OUTPUT AS FILE #3": 1 "FOR OUTPUT AS FILE #3" 1 "FOR OUTPUT AS FILE #1": 1 "FOR INPUT AS FILE #3": 1 "FOR INPUT ?" 1 "F$, B$ ?" 1 "F$(I) D(I) ?" 1 "Estx li smysl wkl`~atx w oglaw-" 1 "Esli pro~itali navmite na WWOD" 1 "Esli posle \togo w q~ejku 'H'" 1 "Esli operator ";: 1 "Esli kursor uka-" 1 "Esli dlq pe~ati 1000 ~isel na-" 1 "Esli |krannyj" 1 "Emkostx displeq - 24 stroki." 1 "EXIT. ": 1 "ENTER), ";: 1 "EKRAN ";: 1 "E (wostok) ili W (zapad):";d$ 1 "E ","F ","EN" 1 "Dwa operatora: ";: 1 "Dopustim, u Was estx magnitofon" 1 "Dopustim, my wweli w q~ejku A" 1 "Dopustim, Wy snimaete fotokopi`" 1 "Dopustim, funkciq wy~isleniq" 1 "Dolvny stoqtx operatory wwoda:" 1 "Dolgota (5 cifr):";d$ 1 "Dolgo li movet hranitxsq spisok" 1 "Dobawim k poslednemu sodervimo-" 1 "Dlq ~ego w dannoj programme is-" 1 "Dlq wyhoda w monitor neobhodimo" 1 "Dlq prosmotra spiska komand i" 1 "Dlq prodolveniq navmite ";: 1 "Dlq poqsneniq navmite na ";: 1 "Dlq kakogo wida obrabotki ot-" 1 "Dlq ego wwoda neobhodimo is-" 1 "Dlq ~ego w programmirowanii" 1 "Dlq ~ego otkrywaet operator" 1 "Dlq ~ego nuvno perehoditx k" 1 "Dlq ~ego numeru`t stranicy w" 1 "Dlq zawer{eniq s sohraneniem" 1 "Dlq zawer{eniq redaktirowaniq" 1 "Dlq wywoda komandoj ";: 1 "Dlina okruvnosti = 2*";: 1 "Den|:",t'"Mesyc:",m'"God:",j 1 "Data:";d$ 1 "Dalee wse programmy priwodqtsq" 1 "DX.SYS ?" 1 "DX .SYS 19 15-Jan-85" 1 "DLQ ^EGO SLUVIT QZYK PROGRAMMI-": 1 "DLINA OKRUVNOSTI'": 1 "DLINA ";: 1 "DIRECTORY; ";: 1 "DIR","MX1:*.DAT ","EN" 1 "DIR MX1:PROBA.*": 1 "DIR MX1:PRO%%.DAT": 1 "DIR MX1:PRO%%.DAT" 1 "DIR MX1:PRO%%.*": 1 "DIR MX1:, ";: 1 "DIR MX1: ";: 1 "DIR MX0:RO%IN.*": 1 "DIR MX0:*.COM": 1 "DIR MX0:*.COM" 1 "DIM A(8)" 1 "DIM A(8) 1 A=1" 1 "DIM ","2 ","EN" 1 "DELETE MX1:LIZA.*" 1 "DELETE MX0:LISA.*": 1 "DELETE MX0:*.COM" 1 "DELETE ","THE ","SYMBOL ","Z","EN" 1 "DELENIE'": 1 "DEJSTWIQ:'": 1 "DATE 15-Mar-89": 1 "DAT, ";: 1 "DA ILI NET (D/N)-->"; 1 "DA ","EN" 1 "D(I)- ";: 1 "Cikli~eski powtorq`tsq opera-" 1 "Celaq ~astx'H'rawna'K%": 1 "CS" TO FIRST PAGE 1 "COPY/SYS ... .": 1 "COPY/BOOT MX0:MXMNSJ.SYS MX1:" 1 "COPY, ";: 1 "COPY MX1:REX.BAS MX0:REX1.BAS": 1 "COPY MX1:REX.BAS MX0:": 1 "COPY MX1:*.COM MX0:" 1 "COPY MX0:*.* MX1:": 1 "COPY MX0:*.* MX1:" 1 "COPY MX0:*.* MX1: ";: 1 "COPY MX0:%%%A.COM MX1: ?" 1 "COMMAND:, ";: 1 "COMMAND:).": 1 "COM, BAS," 1 "CIKL1 ";: 1 "CHISLA ?" 1 "CHILDREN" 1 "CHILDREN F$(I)-": 1 "CENNIK, ";: 1 "CELYJ","CELOE","EN" 1 "CAPS SHIFT" 1 "CAPS SHIFT ";: 1 "CAPS - SIMBOL" 1 "CAPS ";: 1 "Bolx{ee ili menx{ee iz dwuh ~i-" 1 "Blagodarq kakomu |lektronnomu" 1 "Bejsike DWK stanowitsq ne nuv-" 1 "Bejsik-DWK, kogda \WM wykl`~ena" 1 "Bejsik dlq \WM SEWER i DWK-3." 1 "Bejsik \WM SEWER imeet 32 funk-" 1 "BUKWENN","SIMWOLXN","LITERN","STROKOW","EN" 1 "BORIS i MARIQ ?" 1 "BASIC6-9" 1 "B:BIORITM" 1 "Awtor Fedorow": 1 "Awtor Alekseew": 1 "Aud","aud","AUDITORIQ","CO","6 ","EN" 1 "AS FILE #1": 1 "A8 .MAC 3 20-Apr-84" 1 "A, kogda wypolnqet operator s" 1 "A*A*A-(A-B)*(A-B)*(A-B)": 1 "A kakie perwye tri ~isla na-" 1 "A i W ?": 1 "A ","B ","EN" 1 "<SECTION>": 1 "<RESET>": 1 "<REPLACE>, ";: 1 "<HELP> ";: 1 "<FINDNEXT>.": 1 "<ENTER>": 1 "< -menx{e, > -bolx{e)." 1 ";t;" ";m$(m)( 1 "; - operatorow mevdu na~alom i koncom cikla,obrazu`}ih telo cikla." 1 "; - operatora konca cikla";: 1 "9. ^to i kak preobrazuet funk-" 1 "9","GO TO","17 ","EN" 1 "9 S=S*A": 1 "9 READ X$": 1 "9 READ M$": 1 "9 PRINT Z": 1 "9 PRINT Y": 1 "9 PRINT #1,F$,D$": 1 "9 OPEN 'POJAS3' FOR INPUT AS FILE #1": 1 "9 GO TO 16": 1 "9 FOR K=1 TO 50 STEP 1" 1 "9 .......": 1 "9 ","PRINT #1,F$,D$ ","EN" 1 "8 STOP 8 STOP": 1 "8 RESTORE K+1": 1 "8 READ M$": 1 "8 PRINT '3 -";: 1 "8 OPEN F$ FOR INPUT AS FILE #2": 1 "8 NEXT X": 1 "8 LET Z=X(M)+X(N)": 1 "8 LET S=S+X*X": 1 "8 INPUT A,B": 1 "8 INPUT A": 1 "8 IF X<3 1 "8 IF N=3 THEN GO TO 9" 1 "8 GOTO 10" 1 "8 D$=STR$(D)": 1 "8 ","1 ","EN" 1 "7. Zamena.": 1 "7. Razmery buferow.": 1 "7 S=S+D": 1 "7 READ M$": 1 "7 PRINT X": 1 "7 PRINT TAB 10; 7 PRINT TAB(10)" 1 "7 PRINT T$": 1 "7 PRINT K%' ";: 1 "7 PRINT K": 1 "7 PRINT D$": 1 "7 PRINT A": 1 "7 PRINT 'BEC=';M": 1 "7 PRINT '2 -";: 1 "7 PRINT ";: 1 "7 OPEN 'POJAS2' FOR INPUT AS FILE #1": 1 "7 NEXT L": 1 "7 NEXT K": 1 "7 LET Z=Y(1)+Y(2)": 1 "7 LET Z=X(M)+4": 1 "7 LET X=X+1": 1 "7 LET N=2": 1 "7 LET L=2" 1 "7 KNIG ","EN" 1 "7 K%=K%+D(I)": 1 "7 INPUT K": 1 "7 INPUT F$,D": 1 "7 IF X<8 THEN GOTO 4": 1 "7 IF X<10 THEN GOTO 4": 1 "7 IF N=2 THEN GO TO 10": 1 "7 IF K<20 THEN GO TO 3": 1 "7 F$='MART.DAT'": 1 "7 ","CO","9 ","EN": 1 "60 PRINT '";: 1 "60 .......": 1 "6. Pereme}enie, kopirowanie i": 1 "6. Funkcionalxnye klawi{i <SU>.": 1 "6","LET","Z=X(3)+X(4) ","EN" 1 "6","GO TO","M ","EN" 1 "6 PRINT Z": 1 "6 PRINT X,Y": 1 "6 PRINT X(8)": 1 "6 PRINT X(5) X(6)->36" 1 "6 PRINT S" 1 "6 PRINT D$": 1 "6 PRINT C$": 1 "6 PRINT '4-ctg'": 1 "6 PRINT '17-";: 1 "6 PRINT '1 -";: 1 "6 ON N GOTO 11,10,9": 1 "6 NEXT M": 1 "6 NEXT I 6 NEXT I" 1 "6 LET Z=X(1)+X(2)+X(3)": 1 "6 LET Z=X(1)+X(2)": 1 "6 LET X=2": 1 "6 LET T$= 1 "6 LET P=S-C": 1 "6 LET C$=A$+B$": 1 "6 INPUT Y(2)": 1 "6 INPUT F$(I),D(I)": 1 "6 IF... , 7 IF... , 8 IF...": 1 "6 IF N=1 THEN GO TO 11": 1 "6 IF K%=1 THEN V$='A'": 1 "6 IF A$=B$ 1 "6 GOTO 10" 1 "6 GO TO R" 1 "6 GO TO M": 1 "6 GO TO M" 1 "6 F$='FEVR.DAT'\ GOTO 8": 1 "6 D=VAL(D$)": 1 "6 -wyhod iz redaktora" 1 "6 ","IF ","X<8 ","THEN ","GOTO ","4 ","EN" 1 "6 ","7 ","8 ","EN" 1 "59 PRINT #3,V$": 1 "58 PRINT #2,V$\ GOTO 60": 1 "57 PRINT #1,V$\ GOTO 60": 1 "56 ON C GOTO 57,58,59" 1 "55 READ C": 1 "54 READ C": 1 "53 READ C": 1 "52 ON K GOTO 55,54,53": 1 "51 INPUT K": 1 "500 m. Kak sportsmen re[aet," 1 "50 PRINT '";: 1 "50 NEXT I": 1 "5. Zadanie segmenta redaktiro-": 1 "5. Komandy operatora.": 1 "5","GO","SUB","10 ","EN" 1 "5 Wy~islqtx M po podprogramme": 1 "5 STOP 5 STOP" 1 "5 Perejti na operator 3": 1 "5 PRINY X": 1 "5 PRINT Y": 1 "5 PRINT X,Y": 1 "5 PRINT X,X,Z": 1 "5 PRINT X ";: 1 "5 PRINT SEG$(S$(1),1,6)": 1 "5 PRINT K%'-";: 1 "5 PRINT K": 1 "5 PRINT D$": 1 "5 PRINT ..." 1 "5 PRINT '3-tg'": 1 "5 PRINT ";: 1 "5 OPEN 'POJAS1' FOR INPUT AS FILE #1": 1 "5 NEXT K X(5)->25" 1 "5 NEXT C": 1 "5 LET Z=Y+X Z->?": 1 "5 LET Z=X(1)+X(2)": 1 "5 LET Z=K+7": 1 "5 LET Y=Y+X*X": 1 "5 LET Y=Y+ 1 "5 LET X=X+2": 1 "5 LET X(3)=20": 1 "5 LET S=S+I*I 5 S=S+I*I" 1 "5 LET R=10-K": 1 "5 LET K=K*X": 1 "5 LET D$=C$(K 1 "5 LET D$=C$(3 1 "5 INPUT R,D,Q": 1 "5 INPUT B$": 1 "5 INPUT #3,F$,D$": 1 "5 IF X<10 THEN GOTO 3": 1 "5 IF K<40 THEN GO TO 3": 1 "5 IF K<10 THEN GO TO 3": 1 "5 IF K%<5 THEN V$='";: 1 "5 GOTO 3": 1 "5 GOTO 2": 1 "5 GO TO X" 1 "5 FOR I=1 TO N": 1 "5 FOR I=1 TO 10": 1 "5 F$='JANV.DAT'\ GOTO 8": 1 "5 DATA '";: 1 "5 -zamena stroki": 1 "5 ","IF ","X<8 ","THEN ","GOTO ","3 ","EN" 1 "5 ","CO","7 ","EN": 1 "5 ","8 ","EN" 1 "5 ","6 ","7 ","EN" 1 "49 DATA 1,2,3": 1 "49 ","EN" 1 "480 ","EN" 1 "48 INPUT V$": 1 "413 Free blocks": 1 "40 strok. Kakie stro~ki okavut-" 1 "40 S=S+X": 1 "4. Obzor funkcij.": 1 "4. Iskl`~enie i wosstanowlenie": 1 "4 V$=''": 1 "4 STOP 4 STOP": 1 "4 STOP 4 PRINT Z" 1 "4 S$(2)='2-";: 1 "4 READ A$": 1 "4 READ A$" 1 "4 PRINT Z,X": 1 "4 PRINT Y" 1 "4 PRINT X 4 PRINT X,X" 1 "4 PRINT V": 1 "4 PRINT R$": 1 "4 PRINT C": 1 "4 PRINT A$": 1 "4 PRINT '2-cos'": 1 "4 PRINT '15-";: 1 "4 PRINT #1, A,K,C" 1 "4 OPEN 'SPISOK' FOR OUTPUT": 1 "4 ON N GOTO 5,7,9": 1 "4 ON K GOTO 5,6,7": 1 "4 LET Z=X+X": 1 "4 LET Y=X+5 Y->?": 1 "4 LET Y=5*X+3": 1 "4 LET Y=4*K+1": 1 "4 LET Y=2*X": 1 "4 LET X=X+1" 1 "4 LET X=K+5": 1 "4 LET X=K*K": 1 "4 LET X(K)=SIN(K)": 1 "4 LET X(K)=K*K X(4)->16" 1 "4 LET D$='4'+'5'": 1 "4 LET C$=A$(1 1 "4 LET C$='KAROLINA'": 1 "4 LET B$=A$(R)": 1 "4 KNIGI ","EN" 1 "4 K%=INT(X)": 1 "4 INPUT Y(1)" 1 "4 INPUT R": 1 "4 INPUT K": 1 "4 FOR X=0 TO 4* 1 "4 FOR I=1 TO 10": 1 "4 FOR I=1 TO 10 4 FOR I=1 TO 10" 1 "4 F=13.16": 1 "4 DATA '";: 1 "4 C$=A$+'O'+B$": 1 "4 -udalenie stroki": 1 "4 ","STOP ","EN": 1 "4 ","CO","6 ","EN": 1 "4 ","4 ","8 ","EN" 1 "365*j+t+31*(m-1)": 1 "300 ","EN" 1 "30 INPUT X": 1 "30 ","20 ","EN" 1 "3. Pereme}enie kursora po stra-": 1 "3. Funkcionalxnye klawi{i, is-" 1 "3) Pustx H<--8": 1 "3) Pustx H<--8 3 ...": 1 "3","READ","A$ ","EN" 1 "3","LET","Z=Z+2 ","EN" 1 "3","LET","X","=","8","EN": 1 "3 WWOD W": 1 "3 S$(1)='1-";: 1 "3 PRINT Z 3 PRINT Z" 1 "3 PRINT Z 3 LET X=2+4" 1 "3 PRINT X": 1 "3 PRINT D$": 1 "3 PRINT A$(2)": 1 "3 PRINT ... , ";: 1 "3 PRINT '14-";: 1 "3 PRINT '1-sin'": 1 "3 PRINT #1, A,B,C": 1 "3 LET Z=5+2": 1 "3 LET Y=0": 1 "3 LET X=2*2": 1 "3 LET X=2 3 LET X=2" 1 "3 LET X=1 X->?": 1 "3 LET X(1)=5": 1 "3 LET X(1)=10": 1 "3 LET S=0 3 S=0" 1 "3 LET R=3": 1 "3 LET R$= 1 "3 LET L=": 1 "3 LET K=K+3": 1 "3 LET K=0": 1 "3 LET B=4.7": 1 "3 LET B=(3.724*5.327+14.017)*11.597": 1 "3 LET B$=A$(4 1 "3 LET B$=A$(2 1 "3 LET B$=A$(1)": 1 "3 LET B$='WOZ'": 1 "3 LET B$='WORD'": 1 "3 LET B$='RAN'": 1 "3 LET A=2: LET B=1.5": 1 "3 INPUT X": 1 "3 INPUT N": 1 "3 INPUT K%": 1 "3 INPUT A$": 1 "3 FOR K=2 TO 8 STEP 2": 1 "3 FOR K=1 TO 8 STEP 2": 1 "3 FOR K=1 TO 8 X(3)->9" 1 "3 FOR K=... TO ... STEP ...": 1 "3 FOR C=1 TO 60 STEP 1": 1 "3 B$=SEG$(A$,1,5)": 1 "3 B$=F$+'A'": 1 "3 B$='";: 1 "3 -wstawka stroki": 1 "3 -ob'em sfery ": 1 "3 (Wwod ~ise w q~ejki A i W)": 1 "3 ","TRI ","CO","2 ","DWE ","EN" 1 "3 ","PRINT ","K ","EN" 1 "3 ","LET ","X=X+3 ","EN" 1 "3 ","LET ","X=X+2 ","EN" 1 "3 ","LET ","K=1 ","EN" 1 "3 ","IF ","X<10","THEN ","GOTO ","3 ","EN" 1 "3 ","4 ","5 ","EN" 1 "3 ","4 ","5 ","6 ","7 ","EN" 1 "3 ","4 ","3 ","4 ","5","EN" 1 "27 ","EN" 1 "25 ","EN" 1 "23678",y1 1 "23677",o^h: 1 "23658",q: 1 "23","7","28","3","33","1" 1 "21";"roq:";j: 1 "20, a w q~ejku W 10. Operatory" 1 "20 PRINT Y$": 1 "20 FOR I=1 TO 10": 1 "20 ","3 ","EN" 1 "20 ","10 ","EN" 1 "2. Wyhod iz redaktora.": 1 "2. Uslowiq primeneniq i pusk" 1 "2. Komandy opredeleniq stranic" 1 "2. Funkciq <";: 1 "2, 4, 6, 8 ?" 1 "2, 3, 4, 5, ...?" 1 "2) revim bez podskazki (bez" 1 "2) Pustx H<--5": 1 "2) Pustx H<--5 ";: 1 "2","FOR","K=2","TO","8","STEP","2 ","EN" 1 "2","FOR","K=1","TO","20","STEP","1 ","EN" 1 "2 X$='BEC '": 1 "2 WWOD A": 1 "2 T=134255": 1 "2 PRINT'";: 1 "2 PRINT 'NUMBER ?'": 1 "2 PRINT ";: 1 "2 OPEN 'SPISOK.DAT'": 1 "2 OPEN 'SPISOK'FOR OUTPUT": 1 "2 OPEN 'SPISOK' FOR INPUT": 1 "2 LET Z=2+3 2 LET Z=1+8-2" 1 "2 LET Z=1+5 2 LET Z=1+8-2" 1 "2 LET Z=1 ";: 1 "2 LET Z=0": 1 "2 LET Z=0" 1 "2 LET Y=0": 1 "2 LET X=144": 1 "2 LET X=1+3+5": 1 "2 LET X=1 2 LET X=1" 1 "2 LET X=1 X-> 1 "2 LET X=0.5": 1 "2 LET X=0";: 1 "2 LET R=10: LET D=0.3": 1 "2 LET L=1": 1 "2 LET K=10": 1 "2 LET K=1+5": 1 "2 LET K=": 1 "2 LET D$= 1 "2 LET C=4+5": 1 "2 LET A=6": 1 "2 LET A=4.8 ?" 1 "2 LET A=4.3": 1 "2 LET A=4": 1 "2 LET A=(3.1415*6.1792+13.925)*11.626": 1 "2 LET A$='STRONCIJ'": 1 "2 LET A$='PARO'": 1 "2 LET A$='LONDON'": 1 "2 LET A$='KROSS'": 1 "2 LET A$='KPOCC'": 1 "2 LET A$='GLAGOL'": 1 "2 LET A$='EK'": 1 "2 LET A$='456'": 1 "2 Files, 19 Blocks" 1 "2 FOR M=1 TO 5 STEP 1": 1 "2 FOR L=1 TO 100 STEP 1" 1 "2 FOR K=1 TO 50 STEP 1": 1 "2 FOR K=1 TO 20 STEP 0" 1 "2 FOR K=1 TO 10 STEP 2": 1 "2 DIM Y(4)": 1 "2 DIM X(8) X(2)->4" 1 "2 DIM X(3)": 1 "2 DIM X(20)": 1 "2 DIM X(2)": 1 "2 DIM X(10) 2 DIM X(10)" 1 "2 DIM S$(2)": 1 "2 DEF ... ?" 1 "2 -poisk stroki po fragmentu" 1 "2 -plo}adx kruga " 1 "2 ","LET ","X=10 ","EN" 1 "2 ","LET ","K","=","1","+","5 ","EN": 1 "2 ","3 ","5 ","EN" 1 "2 ","2 ","2 ","EN" 1 "18 PRINT '";: 1 "17","LET","C=A/B",":","RETURN ","EN" 1 "16-UMNOVENIE'": 1 "16","LET","C=TAN ","A",":","RETURN ","EN" 1 "16","LET","C=A*B",":","RETURN ","EN" 1 "15",e;"3. Ka 1 "15","MAR","89","EN" 1 "15","LET","C=A-B",":","RETURN ","EN" 1 "15 IF K<X 1 "14 sentqbrq w 17:00 bytx u Iwa-": 1 "14 LET M=M*X": 1 "14 GO TO B": 1 "13",e;"2. Cocmo 1 "13",b+h;m$(i+e): 1 "13"+a,e;w$(a): 1 "13 LET K=K+1": 1 "13 LET B=D+14": 1 "13 .......": 1 "12 OPEN Y$ FOR OUTPUT AS FILE #1": 1 "12 LET K=0": 1 "12 INPUT D": 1 "12 Ubevi}e.Arest.Vertwy." 1 "11","35","45","EN" 1 "11 Y$=SEG$(S$(2),7,10)+'.DAT'": 1 "11 S=S*A": 1 "11 PRINT '";: 1 "11 NEXT K": 1 "11 LET M=1": 1 "11 GO SUB D": 1 "11 GO SUB 13+D": 1 "11 CLOSE #1": 1 "11 Druvba i ob}estwo." 1 "100RQDOW": 1 "100 rqdow ({ereng) po 50 soldat" 1 "100 ","EN" 1 "100 ","5000 ","EN" 1 "10 Y$=SEG$(S$(1),7,10)+'.DAT'\ GOTO 12": 1 "10 Y$=SEG$(S$(1),7,10)+' 1 "10 Y$=CLK$": 1 "10 STOP": 1 "10 S=S*A": 1 "10 REM SUBROUTINE": 1 "10 PRINT X$": 1 "10 PRINT M$": 1 "10 PRINT K%' ";: 1 "10 NEXT I": 1 "10 INPUT V" 1 "10 CLOSE #3": 1 "10 ","9 ","EN" 1 "10 Ob}estwennye processy. Karxera.Dostiveniq." 1 "1. Zapusk |krannogo redaktora.": 1 "1. Nazna~enie.": 1 "1. Komandy dlq raboty so wspo-" 1 "1. Funkciq <";: 1 "1-zima","1-ZIMA ","EN" 1 "1-J WES = 13.16 KG ","EN" 1 "1, 2, 3, 4, ...": 1 "1) revim s podskazkoj-w werhnem" 1 "1) Pustx H<--0": 1 "1) Pustx H<--0 ";: 1 "1","2","3","4","5","6","7","8","9","10","EN" 1 "1 delenie?" 1 "1 REM ZIKL5": 1 "1 REM ZIKL3": 1 "1 REM ZIKL1": 1 "1 REM WYBOR": 1 "1 REM WES": 1 "1 REM WEEK": 1 "1 REM VVOD": 1 "1 REM VOZVRAT": 1 "1 REM VOVA": 1 "1 REM VOVA 1 REM LENA" 1 "1 REM VES": 1 "1 REM VALUE": 1 "1 REM V": 1 "1 REM UP": 1 "1 REM TWO": 1 "1 REM Summa": 1 "1 REM SYMBOLS": 1 "1 REM SUM": 1 "1 REM STUDENT": 1 "1 REM STRONCIJ": 1 "1 REM STRING": 1 "1 REM STEPEN: LET S=1": 1 "1 REM STEPEN1: LET S=1": 1 "1 REM STEPEN-SEVER: LET S=1": 1 "1 REM STEPEN-DVK\ S=1": 1 "1 REM SQUIRREL": 1 "1 REM SEZON": 1 "1 REM SEVER 1 REM DVK" 1 "1 REM SEGMENT": 1 "1 REM Red": 1 "1 REM RIGHT": 1 "1 REM RAROWOZ": 1 "1 REM PROGRAMMA": 1 "1 REM PR2": 1 "1 REM PR10": 1 "1 REM PLUS": 1 "1 REM PHONE": 1 "1 REM PETROV": 1 "1 REM NUMBERS": 1 "1 REM NAME2": 1 "1 REM NAME": 1 "1 REM NABOR": 1 "1 REM Mult": 1 "1 REM MIN": 1 "1 REM MESYATS": 1 "1 REM MASSIV X(1)->1" 1 "1 REM Lena";: 1 "1 REM Lena": 1 "1 REM LONDON": 1 "1 REM LETTER": 1 "1 REM LENGHT": 1 "1 REM KWARTAL-1": 1 "1 REM KRUG": 1 "1 REM KOLTSO": 1 "1 REM KALK": 1 "1 REM KADRY- ";: 1 "1 REM JOIN": 1 "1 REM ITOG": 1 "1 REM GUESS": 1 "1 REM GLAGOL": 1 "1 REM G": 1 "1 REM FUNKCII": 1 "1 REM FUNK": 1 "1 REM ERR": 1 "1 REM EKRAN": 1 "1 REM DWA": 1 "1 REM DVK": 1 "1 REM DLINA": 1 "1 REM COPMPARE": 1 "1 REM CLOCK": 1 "1 REM CIKL1": 1 "1 REM CIKL": 1 "1 REM CHISLA": 1 "1 REM CHILDREN- ";: 1 "1 REM CHILDREN": 1 "1 REM CHAR": 1 "1 REM CENNIK": 1 "1 REM BOOK": 1 "1 REM BOBA": 1 "1 REM BEG": 1 "1 REM A1": 1 "1 REM A": 1 "1 LET X=0": 1 "1 -prodolvenie nabora": 1 "1 -dlina okruvnosti " 1 "1 ","6 ","7 ","EN" 1 "1 ","5 ","32 ","EN" 1 "1 ","3 ","6 ","EN" 1 "1 ","3 ","5 ","1 ","4 ","7 ","EN" 1 "1 ","2 ","3 ","4 ","EN" 1 "0","6","0.3 ","EN" 1 "0 -wyhod iz l`bogo revima": 1 "///NE WERNO///" 1 ".~islo,kotoroe wy wwedete budet priswoeno peremennoj 1 ".primer:" 1 ".poka kompx`ter 1 ".kavdyj operator";: 1 ".TYPE MX1:REX.BAS": 1 ".SAV). ";: 1 ".REN MX0:REX.BAS MX0:REX1.BAS" 1 ".R K52 ";: 1 ".COPY MX1:REX.BAS MX0:REX1.BAS" 1 ".COPY MX1:REX.BAS MX0:" 1 "............! 60 m." 1 ".......": 1 ". 1 "-wyraveniq razdelq`t-sq zapqtymi,to oni budut wywoditsq w dwa stolbika(w lewoj i pra-woj polowinah |krana)." 1 "-wyraveniem,ono razde-lqetsq zapqtymi ili to~koj s za-pqtoj,nazywaemymi";: 1 "-wyravenie budet nape~atano s na~a-la sledu`}ej stroki." 1 "-wyravenie budet nape~ata- no wplotnu` s predydu}im .": 1 "-tol}ina obolo~ki.": 1 "-radius sfery,": 1 "-operator perehoda k stroke s nomerom ";: 1 "-istinnoe ili lovnoe wyravenie";: 1 "-dlq kl`~ewyh slow(komand). |tot revim awtomati~eski smenqet revim ";: 1 "-Wosstanowlenie sodervimogo |k-" 1 "-KYPCOP ";: 1 "-Esli o{ibki ne bylo,to na dis-" 1 "-Esli byla o{ibka, to pri is-" 1 "- |to matemati~es-kaq funkciq.i argument i rezulx-tat ee ~islowye.rezulxtat rawen: 1 "- parametry wwoda i wywoda.naprimer:" 1 "- Otmena funkcii <";: 1 ",wyzywa`}ie drugie podprogrammy.takie podprogrammy nazywa`tsq 1 ",w protiwnom slu~ae oni propuska`tsq i wypolnenie programmyprodolvaetsq so sledu`}ego operatora." 1 ",t.e. proishodit wyhod iz cikla" 1 ",kotoryj wyzwal |tu podprogrammu." 1 ",kogda blok dannyh is~erpan,pri-wedet k o{ibke.operator";: 1 ",ili posle ':'.": 1 ",i sostoq}ie iz bukw i cifr:";: 1 ","GO TO 130","GO TO 5","CLS","CLS","LIST","LIST","LET B=A","PRINT W","RETURN","NEXT R","LET Z=X" 1 ", to |ta komandawypolnqtsq ne budet,ona wwedetsqw pamqtx kompx`tera kak stroka programmy." 1 ", kotoryj sodervit spisok peremen-nyh,razdelennyh zapqtymi:" 1 ", i wse opera- tory tela cikla wypolnq`tsq powtorno.";: 1 "+-------------------+---------+" 1 "*- Umnovenie.": 1 "* -znak umnoveniq": 1 "(t.e. fajlow,soderva}ih komandy" 1 "(sozdannyj odnoj iz programm)?" 1 "(prevnee) sodervanie q~ejki H," 1 "(nomerami) 3 i 4, to estx obes-" 1 "(nazowem ee uslowno H), w koto-" 1 "(iz diapazona 48 - 59) budet" 1 "(i delitelx)?" 1 "(Print)?" 1 "(Magnetic Tape) ";: 1 "(2.6*m1-.1)": 1 "(2 gradusa 3 minuty = 00203)" 1 "(18-n)*8+3": 1 "(...+H...+H*H...+H*H*H...)": 1 "'wozwrat na sledu`}ij" 1 "'protokol' raboty \WM:": 1 "'perjti k...'" 1 "'pereimenowatx'." 1 "'kolxca' mevdu |timi okruvnos-" 1 "'belka w kolese'. Napi{ite fra-" 1 "'ZIKL' ?" 1 "'X$'= 'F' ";: 1 "'Wwedite zna~eniq A i W'": 1 "'SUMMA' ?" 1 "'Pustx on pi[et'?": 1 "'PETROW'": 1 "'OPEN' ";: 1 "'Lena'";: 1 "'LENA' ?" 1 "'H'. Kogda komanda posylaet " 1 "'FOUR' ?" 1 "'Auditoriq 6'": 1 "'Auditoriq 5'": 1 "''" 4. TRDOS"''''''''" 1 "' '. ": 1 "$ -(w perwoj pozicii wwodimoj" 1 "#2). Fajl- |to hranili}e nabora" 1 ""zwuk.cweta,grafika."" ": 1 ""imq programmy"" 1 """wwedi ~islo""";: 1 """werno"":";: 1 " ~to dast 3*6=18 indeksiruemyh peremennyh:": 1 " ~isla w operatorah ";: 1 " ~isla mogut bytx polovitelxnymii otricatelxnymi: 1 " ~ertit lini` ot predydu}ej PLOT-poziciih,u-|to prira}eniq koordinat.": 1 " |tot porqdok wy~islenij movno izmenitx s pomo}x` skobok:wyravenie w skobkah wy~islqetsq perwym": 1 " |tot parametr pereme}aet pozi- ci` wywoda w ukazannyj stolbec na toj ve stroke,ili perehodit na nowu` stroku,esli stolbec bylposlednim." 1 " |tot operator wy~islqet i wywo-dit na |kran summu kosinusa i sinusa.": 1 " |kran sodervit 22 stroki po 32 simwola w kavdoj,~to sostawlqet 22*32=704 simwolxnye pozicii. kavdaq simwolxnaq poziciq pred-stawlqetsq kwadratom 8*8 to~ek, nazywaemyh pikselami. piksel zadaetsq dwumq koordina-tami: H-udalenie ot lewoj grani-cy |krana,U-udalenie ot nivnej granicy |krana(w pikselah)." 1 " zna~eniq peremennyh movno izme-nitx s pomo}x` operatora priswa-iwaniq,w kotorom zada`tsq imq peremennoj i priswaiwaemoe zna~e- nie.~islo operatorow priswaiwa- niq rawno ~islu peremennyh.~em bolx{e w programme peremennyh, tem bolx{e operatorow na~alxnogopriswaiwaniq zna~enij.dlq sokra-}eniq ob'ema programmy i udob- stwa wneseniq izmeneniq w na~alxnye zna~eniq peremennyh ime`tsq sredstwa raboty s blokom dannyh." 1 " zna~eniq not odnoj oktawy: 1 " zadaet revim mercaniq: 0-mercanie wykl`~eno, 1-mercanie wkl`~eno." 1 " wy~islqet korenx kwadratnyj ot ~isla:";: 1 " wy~islq`tsq w wyravenii slewa naprawo i ime`t urowenx star{instwa,menx{ij, ~em arifmeti~eskie operacii i operacii otno{eniq,t.e.wypolnq`tsq w posledn`` o~eredx.operaciq";: 1 " wyswe~iwaetzakra{iwa`}im cwetom piksel s ukazannymi koordinatami.": 1 " wypolnqq |tot operator kompx`- ter wywedet na |kran(w nivnej ~asti)wopros,w otwet "; 1 " wy movete sami opredelitx funk-ci`,ukazaw";: 1 " wwodit razli~-nye zna~eniq s klawiatury i pri-swaiwaet ih peremennym.|tot ope-rator,kak i operator 1 " woznikaet posle navatiq klawi{i ": 1 " wmesto kavdoj iz odinakowyh posledowatelxnostej operatorow zapisywa`t po odnomu operatoru wyzo-wa podprogrammy: ";: 1 " wmesto imeni movno ukazatx pustu` stroku,togda budet wzqt perwyj wstretiw{ijsq fajl." 1 " wlewo - ";: 1 " w |tom primere programma budet wypolnqtsq skolxko ugodno dolgo. posle stroki 40 budet wypolnqt-sq stroka 30,zatem stroka 40, zatem snowa stroka 30 i t.d. zdesx pokazan primer beskone~no-go zacikliwaniq programmy." 1 " w |toj": 1 " w tojve posledowatelxnosti obrazu`t blok dannyh. operatory:" 1 " w stroke 50 nahoditsq operator ";: 1 " w stroke 10 peremennoj s priswaiwaetsq zna~enie rawnoe 234.t.e.posle wypolneniq stroki 10 teku-}ee zna~enie s rawno 234. w stroke 20 iz teku}ego zna~e- niq s wy~itaetsq 4 i polu~ennoe zna~enie priswaiwaetsq peremen- noj s t.e. iz 234 wy~itaetsq 4 irezulxtat,rawnyj 230 priswaiwaetsq peremennoj s.takim obrazom posle wypolneniq stroki 20 teku-}ee zna~enie peremennoj s stano-witsq rawnym 230." 1 " w rezulxtate na |kran budet wy-wedeno ~islo 1 " w prawoj ~asti operatora priswaiwaniq movet bytx l`boe wy~islqemoe wyravenie,glawnoe-~toby wse peremennye w wyravenii byli opredeleny do togo kak oni budut ispolxzowany w wyravenii." 1 " w l`bom meste programmy: ";: 1 " w kompx`tere ime`tsq trigonometri~eskie funkcii: ";: 1 " w ka~estwe uprawlq`}ej peremen-noj cikla nelxzq ispolxzowatx indeksiruemu` peremennu`(|lementmassiwa)." 1 " w bejsike movno rabotatx i s drobnymi ~islami.drobnaq ~astx zapisywaetsq w wide desqti~noj drobi,pri~em celaq i drobnaq ~asti otdelq`tsq ne zapqtoj,kak |tooby~no prinqto,a 1 " udalqet simwolnahodq}ijsq slewa ot kursora.": 1 " to estx 5 indeksiruemyh peremennyh: w(1),w(2)...,w(5).sledu`}aqprogramma pokazywaet e}e odno preimu}estwo massiwow:": 1 " teperx perejdem k osnowam qzykabejsik.": 1 " teperx ostanowimsq na komandah BEJSIKA. po komande";: 1 " takim sposobom movno wy~islqtx i bolee slovnye wyraveniq,w tom ~isle i wse |lementarnye matema-ti~eskie funkcii. 1 " t.e.sledu`}ejbudet wypolnqtsq stroka program-my s nomerom ";: 1 " stroka, nabrannaq w nivnej ~asti |krana,libo wypolnqetsq kak komanda (esli ona bez nomera),libo wwoditsq kak o~erednaq stroka w programmu,libo ispolxzuetsq kak spisok dannyh dlq wwoda.esli ve ona sodervit sintaksi~eskie o{ibki,to o{ibo~noe mesto ukazywaetsq merca`}im znakom 1 " stroka 40 srawniwaet ~isla a,w i esli oni rawny-zawer{aet rabo-tu,wypolnqq komandu ";: 1 " sluvit dlq pe~a-ti teksta programmy na |krane. pe~atx na~inaetsq s perwoj stroki po porqdku."; 1 " slowo";: 1 " sformiru`t blok dannyh iz {esti~isel: 1,2,-5e-1,0,-3,5.operato-ry";: 1 " s drugimi klawi{ami w revime kursora 1 " s koordinatami ee centra H,U.": 1 " prowerqet zna~e- niq dwuh swoih operandow.esli oba operanda rawny 0,to rezulx- tat operacii rawen 0.w protiwnom slu~ae on otli~en ot 0." 1 " prostej{im uslowiem movet bytx srawnenie dwuh ~isel.~isla mogut bytx libo rawny,libo odno bolx-{e drugogo.": 1 " proizwodit o~istku |krana i ustanawliwaet";: 1 " proizwodit inwersi` zna~eniq peremen- 1 " proishodit pereda~a uprawleniq operatoru sledu`}emu srazu za operatorom";: 1 " programma zapi{etsq na lentu tak,~to kogda ona budet wnowx s~itana po komande";: 1 " prodolvaet wypolnenie ostanowlennoj programmy.komanda";: 1 " prodemonstriruem rabotu operatora";: 1 " priwodit k wwodu wspomogatelxnogo simwola,nanesennogo na klawi{u rqdom s bukwoj,"; 1 " priwodit k smene kursora ";: 1 " priwedet k o{ibke.": 1 " priwedet k o{ibke.": 1 " print-";: 1 " primer ispolxzowaniq operatora";: 1 " pri pomo}i";: 1 " pri napisanii programmy movet 1 " prerywaet wypolnenie programmy.po |toj komande prekra}aetsq wypolnenie program-my i wydaetsq soob}enie ob |tom." 1 " prednazna~en dlq pe~ati zna~enij konstant,pe remennyh i wyravenij.w ka~estwe parametrow operatora";: 1 " pozwolqet re- daktirowatx tu stroku programmy w kotoru` ustanowlen programnyj kursor(>).po komande";: 1 " poytka wojti w podprogrammu ne ~erez operator";: 1 " poslednqq wwedennaq stroka nazywaetsq teku}ej i ukazywaetsq simwolom 1 " posle kotorogo idet l`- boj tekst.kommentarij ne okazy- waet nikakogo wliqniq na wypolnenie programmy." 1 " porqdok,w kotorom wypolnq`tsq matemati~eskie wyraveniq: 1 " poqwlqetsq posle odnowremennogo navatiq klawi{ ";: 1 " poprobujte wypolnitx:": 1 " pomnite: wse trigonometri~eskiefunkcii wy~islq`tsq w 1 " podprogramma movet sodervatx operatory";: 1 " pod |lementy massiwa neobhodimozarezerwirowatx pamqtx.|to delaetsq s pomo}x` operatora";: 1 " pe~ataet": 1 " pe~ataet ~etnye ~isla iz interwala (0,100).": 1 " peresta-" 1 " peremennymi nazywa`tsq weli~inykotorye w hode wypolneniq prog- rammy mogut izmenqtx swoi zna~e-niq.dlq obozna~eniq peremennyh ispolxzu`tsq imena,na~ina`}iesq s bukwy(ot a do ";: 1 " peremennye w massiwe qwlq`tsq ego |lementami,oblada`t ob}im imenem i razli~a`tsq tolxko nomerom,zapisywaemym w skobkah posleimeni,(indeksom).naprimer,a(10)-desqtyj |lement massiwa a." 1 " peremennaq";: 1 " peredaet uprawlenie ukazannoj stroke,s kotoroj na~inaetsq pod-programma.zatem wypolnq`tsq ope-ratory podprogrammy oby~nym obrazom,poka ne wstretitsq operator";: 1 " otno{eniq zada`tsq znakami:" 1 " otno{enie dliny okruvnosti k eediametru-estx ~islo PI="; 1 " osnownoe otli~ie zakl`~aetsq w tom,~to operator";: 1 " opredelqet cwet tona(~ernil),naprimer,";: 1 " opredelqet qrkostx: 0-normalxnaq qrkostx, 1- powy{ennaq." 1 " opredelqet cwet fona. operator 1 " operatory";: 1 " operatory opredelq`t dejstwiq nad ~islowymi weli~inami,a takveporqdok wy~islenij.kavdaq stroka programmy sodervit operator, sostoq}ij iz imeni i parametrow:peremennyh,konstant,metok i dr." 1 " operator priswaiwaniq imeet formu:";: 1 " operaciq ";: 1 " operacii";: 1 " odna ili sowmestno s 9.cifrowyeklawi{i da`t takve mozai~nye simwoly."; 1 " obratnoj k |ksponencialxnoj qwlqetsq logarifmi~eskaq funkciqlogarifm ~isla h po osnowani` a,estx stepenx,w kotoru` nuvno wozwesti a,~toby polu~itx h. naturalxnyj logarifm h(logarifm po osnowani` E)obozna~aetsq kak ";: 1 " obratitsq k funk-cii ";: 1 " neobhodimo zametitx,~to popytkaispolxzowatx massiwy w programmebez predwaritelxnogo opisaniq w operatore";: 1 " nazywaetsq";: 1 " navatie klawi{i wyzowet wwod operatora ili cifry.";: 1 " naprimer,programma": 1 " naprimer,po komande";: 1 " naprimer nuvno pods~itatx summu~isel 26 i 48.dlq |togo neobhodimo wwesti taku` komandu: ";: 1 " naprawleniq prira}enij opredelq`tsq znakami: wwerh i wprawo '+' wniz i wlewo '-'": 1 " naberite nuvnoe wam ~islo,navmite klawi{u";: 1 " movno takve ob'qwlqtx massiwy s bolee,~em odnoj razmernostx`. naprimer w dwumernom massiwe perwyj indeks movno srawnitx s nomerom stroki,a wtoroj s poziciej wstroke.takoj massiw kak by opisywaet stranicu." 1 " movno takve wy~ertitx otrezok dugi,ispolxzuqdlq |togo dopolnitelxnoe ~islo, zada`}ee ugol |toj dugi w radi- anah:";: 1 " movno ispolxzowatx l`boe wyravenie,kotoroe wy~islqetsq po oby~nym prawilam.~isla pe~ata`tsq w desqti~nom wide.naprimer:" 1 " movet wywesti na |kran 8 cwetow s dwumq gradaciqmi qrkosti.cweta kodiru-`tsq ciframi ot 0 do 7. kodirowka cwetow: 0 - 1 " massiwom nazywaetsq uporqdo~en-nyj nabor weli~ih,kotoryj oboz- na~aetsq odnim imenem.massiw sostoit iz |lementow,kavdyj iz kotoryh odnozna~no opredelqetsq ime-nem massiwa i poloveniem w nem (indeksom).imq massiwa zadaetsq po tem ve prawilam,~to i imq pe-remennoj." 1 " logi~eskaq operaciq";: 1 " logarifm po osnowani` a movno polu~itx tak:";: 1 " koordinaty zapisywa`tsq w skob-kah,tak(0,0) zadaet lewyj nivnijugol,a (255,176)-prawyj werhnij." 1 " konstanta-|to weli~ina,kotoraq ne movet bytx izmenena w hode wypolneniq programmy.zna~enie konstanty odnozna~no opredelqet-sq ee napisaniem.~islowaq kons- tanta zadaetsq w wide desqti~no-go ~isla.celoe ~islo zapisywaet-sq w wide odnoj ili neskolxkih cifr: 1 " komx`ter";: 1 " kompx`ter ne razli~aet propis- nye i zaglawnye(malenxkie i bolx{ie)bukwy.naprimer imq";: 1 " kompx`ter movet wypolnqtx ~ety-re arifmeti|eskie operacii: 1 " kompx`ter movet 1 " izmeneniq wnosqt udaleniem nenuvnyh simwolow i dobawleniem nuvnyh.": 1 " iz bolee slovnyh operacij ";: 1 " imeet bolx{ij urowenx star{instwa,~em";: 1 " imeet 5 funkcij i pozwolqet wwoditx kak otdelxnye simwoly,tak i celye slowa,dejstwie klawi{i opredelqetsq perekl`~a`}imi klawi{ami": 1 " ili taku` formu:": 1 " i t.d.": 1 " i sohranqetsq do navatiq kakoj-libo odnoj iz nih."; 1 " i navatx klawi{u ";: 1 " i naoborot.": 1 " i klawi{a- ";: 1 " i klawi{a";: 1 " i klawi{a": 1 " i klawi{a" 1 " i imq";: 1 " i imq funkcii, wwodom operatora ";: 1 " i naoborot,esli h=1,to";: 1 " gde N - nomer stroki,s kotoroj na~inaetsq podprogramma.gruppa operatorow,ob 1 " funkciq 1 " funkcii-|to za{itye w bejsik sistemu podprogrammy,kotorye polu~aq na whode odni zna~eniq, nazywaemye argumentami,wozwra}a-`t drugie zna~eniq-rezulxtaty. funkcii ispolxzu`tsq w wyrave- nii prostym wkl`~eniem w nego funkcii,naprimer,funkciq";: 1 " esli wyraveniq razdelq`tsq dwu-mq zapqtymi,to sledu`}ee wyrave-nie pe~ataetsq w drugoj stroke. esli posle poslednego ";: 1 " esli wwesti tretxe izmerenie dlq nomera stranicy,to massiw budet opisywatx knigu w wide: (nomer stranicy,nomer stroki, nomer stolbca)." 1 " esli w ~isle otsutstwuet celaq ili drobnaq ~astx,to ona movet opuskatxsq: 1 " esli polu~ennoe zna~enie menx{eili rawno kone~nomu zna~eni`,to uprawlenie peredaetsq operatoru,sledu`}emu srazu za operatorom na~ala cikla";: 1 " esli parametr";: 1 " esli neobhodimo zapisatx o~enx bolx{oe ili o~enx malenxkoe ~is-lo,to takie ~isla zapisywa`tsq w pokazatelxnoj forme,t.e. so stepenqmi ~isla 10: 1 " esli A polovitelxno,to duga wy~er~iwaetsq wlewo,esli otrica-telxno-to wprawo.pri A=2* 1 " dopuskaetsq tolxko posledowa- telxnoe ~tenie iz bloka dannyh. popytka wypolnitx operator 1 " dlq wy~islenij:": 1 " dlq raboty s magnitofonom estx 4 operatora";: 1 " dlq poqsneniq programmy w nej ispolxzu`t operatory kommentariq|tot operator na~inaetsq so slo-wa";: 1 " dlq polu~eniq bolee wysokih ilibolee nizkih not,nado pribawitx ili otnqtx 12 dlq kavdoj oktawy wwerh ili wniz.": 1 " dlq nego ni~em ne otli~a`tsq": 1 " cikly ispolxzu`tsq dlq realiza-cii dejstwij,kotorye powtorq`tsqneodnokratno,wozmovno s nekoto- rymi izmeneniqmi,naprimer,pri raznyh zna~eniqh peremennyh.": 1 " cikl wypolnqetsq tak: operator";: 1 " cikl obrazuetsq iz 3 |lementow: - operatora na~ala cikla";: 1 " bukwa e ozna~aet wozwesti 10 w stepenx.~islo posle bukwy e nazywaetsq porqdkom i dolvno bytx celym.znak + dlq polovitelxnogo porqdka movet bytx opu}en. wse ~isla mogut imetx to~nostx 9 ili 10 znakow.naibolx{ee ~islo w kompx`tere :10 w stepeni 38, naimenx{ee polovitelxnoe ~islo: 4h10 w stepeni(-39)" 1 " bez parametrowpe~ataet pustu` stroku.oby~no on ispolxzuetsq dlq pe~ati probe- low mevdu strokami" 1 " analogi~na po dejstwi` komande ";: 1 " Zadanie odnoj iz" 1 " Wenera ";z$(4 1 " Uran ";z$(8 1 " Solnce ";z$(1 1 " Saturn ";z$(7 1 " READ ";: 1 " Preoblad.": 1 " Posle |togo navmite na WWOD.": 1 " Pluton ";z$(10 1 " Planety": 1 " PRINT-";: 1 " PRINT ";: 1 " Neptun ";z$(9 1 " NOT X=1";: 1 " NOT X=0.";: 1 " Merkurij ";z$(3 1 " Mars ";z$(5 1 " Luna ";z$(2 1 " LOAD,";: 1 " EDIT ";: 1 " Dlq poqsneniq navmite ";: 1 " Dlq otweta navmite na ";: 1 " Dlq ob'qsneniq navmite ";: 1 " DATA ";: 1 " Bufer stroki - 132 Bajt. ": 1 " Bufer sohraneniq - 512 Bajt. " 1 " Bufer slowa - 80 Bajt. ": 1 " Bufer simwola - 2 Bajt. ": 1 " BLOK DANNYH - |to uporqdo~ennaqposledowatelxnostx ~isel,kotoraq formiruetsq s pomo}x` operato- row";: 1 " @piter ";z$(6 1 " 9 Pute{estwiq.Ob}enie.U~eba. Glubokomyslie" 1 " 8 Razdelennye imu}estwo i ~uwstwa.Nasledstwa.Seks. Duhownaq viznx." 1 " 7 Towari}estwo,brak" 1 " 6.prostoe navatie klawi{i": 1 " 6 Rabota,serwis,zdorowxe" 1 " 5.perejti w revim kusora 1 " 5. Wyhod w BEJSIK" 1 " 5 Seks.Twor~estwo.Risk.Deti. Razwle~eniq" 1 " 4.perejti w revim kusora 1 " 4. Dopolnitelxnaq informaciq" 1 " 4 Doma{nie i semejnye dela" 1 " 379 Free blocks": 1 " 30 NEXT I": 1 " 3.CAPS SHIFT ";: 1 " 3. Rass~itatx nowyj goroskop": 1 " 3 LET X=K*K ?" 1 " 3 Intellekt.interesy.Ob}enie" 1 " 23-Apr-89" 1 " 20 PRINT": 1 " 2.SYMBOL SHIFT ";: 1 " 2. Wywesti goroskop snowa" 1 " 2 Files, 21 Blocks" 1 " 2 Imu}estwo i ~uwstwa" 1 " 10 FOR I=1 TO 100": 1 " 1.prostoe navatie klawi{i": 1 " 1.prosto navatx klawi{u s": 1 " 1 Li~nosti i li~nye dela" 1 " . |tot operator ostanaw-liwaet kompx`ter s wyda~ej soob }eniq ob |tom. w dannom primere |tot operator ne budet wypolnen.";: 1 " . naprimer";: 1 " (|to wariant revima 1 " ~isla s na~ala bloka dannyh: 1 " wosprinimaetsq kak uprawlq`}aq funkciq,napisannaq na cifrowoj klawi{e. ": 1 " sotrudnikow'": 1 " programma budet wypolnqtsq so stroki s nomerom 1 " na |krane - ";: 1 " kow otdela'": 1 " \ta programma movet datx tolx-ko ~astx toj informacii, kotoru`sodervit goroskop. No dave takona dast gorazdo bolx{e indiwi-dualxnogo tolkowaniq, ~em bolx-{instwo publikuemyh w vurnalahgoroskopow." 1 " \ta programma movet datx li{xmalu` dol` toj informacii, koto-raq sodervitsq w goroskope.": 1 " Znaki ukazywa`t na sposob dej-stwiq planetnogo principa. Sek-tor ukazywaet na ego wavnej{u`oblastx deqtelxnosti." 1 " Z[[[[[[[[[[[[[[[[[[[[[[[[[[\ "," ] ] "," ^[[[[[[[[[[[[[[[[[[[[[[[[[[_ " 1 " Wwod l`byh dannyh zakan~iwaet-sq navatiem klawi{i <enter>": 1 " Wremq i mesto rovdeniq o~enxwavny dlq wernogo sostawleniqgoroskopa. Po|tomu Wy nuvdaetesxw polnoj informacii." 1 " Trenaver rabotaet w dwuh re-" 1 " Tem ne menee |to pomovet Wamisprawitx perekosy w Wa{ej viznii zaglqnutx w budu}ee." 1 " Su}estwuet nemalo knig, w ko-toryh priwedeny zna~eniq planet,znakow zodiaka i sektorow. Pos-tarajtesx najti |ti knigi w bib-lioteke. A tem wremenem priwedemosnownu` informaci` w forme tab-licy." 1 " SUBROUTINE, ";: 1 " S pomo}x` rass~itannogo kom-px`terom goroskopa Wy smoveteuznatx naprawlenie wa{ej vizni wdetalqh, wospolxzowaw{isx odnojiz mnogih knig po astrologii" 1 " S S" 1 " Postarajtesx uznatx wremq rov-deniq, a takve {irotu i dolgotumesta rovdeniq iz sprawo~nikaili atlasa." 1 " Pomo~x istolkowatx Wa{ goro-skop Wam movet informaciq o ras-polovenii planet na Wa{ej kar-te." 1 " Ona raspolagaetsq w odnom izdwenadcati znakow zodiaka, atakve w odnom iz 12-ti sektorowploskosti |kliptiki." 1 " Nau~nye issledowaniq da`t wsebolx{e osnowanij weritx tradi-cionnomu mneni` astrologow, ~toSolnce, Luna i planety okazywa-`t wliqnie na harakter ~eloweka,a takve na sobytiq, proishodq}iena Zemle." 1 " Kavdaq planeta wliqet na opre-delennyj viznennyj princip." 1 " ENTER.";: 1 " Dlq otweta navmite ";: 1 " Dlq ob'qsneniq navmite ";: 1 " Astrologi~eskie faktory wliq`tna wse sfery vizni - finansy,zdorowxe, seks, karxeru.": 1 " AS FILE #3": 1 " AS FILE #1": 1 " 30 m. !/ ";: 1 " |lementow teksta.": 1 " zadaet krasnyj cwet tona.": 1 " waniq.": 1 " teksta": 1 " stroki) wyhod w komandnyj" 1 " revim": 1 " programmy.": 1 " preobrazowanie teksta.": 1 " polxzuemye w redaktore K52.": 1 " pe~ataet 1 " nicam i sekciqm.": 1 " na |krane - ";: 1 " na |krane - 1 " mogatelxnymi fajlami.": 1 " i sekcij.": 1 " ^toby prodolvitx, navmite l`bu` klawi{u" 1 " \krannyj redaktor postawlq-" 1 " Zapusk redaktora osu}estwlq-" 1 " Wesx kompleks ras~etow zaj- met u kompx`tera ne bolee dwuh minut." 1 " Wa{ okon~atelxnyj rezulxtat" 1 " W krasnoj stroke budut poqw-" 1 " TRENAVER NABORA SIMWOLOW" 1 " Programma K52 prednazna~ena" 1 " Pri velanii Wy smovete wy- westi na printer shemu raspo- loveniq planet w moment rovde- niq." 1 " Po zakonam Keplera kompx`ter rass~itywaet sej~as to~noe polovenie planet w moment rov- deniq. Ispolxzuq |ti dannye, dlq Was budet sostawlen goro- skop." 1 " PRAWILXNYJ OTWET": 1 " Navmite na ";: 1 " Navmite klawi{u ";: 1 " Navmie odnowremenno klawi{i" 1 " Na klawi{ah najdite nuvnoe": 1 " Koli~estwo wwedennyh probe-": 1 " Dlq wwoda operatorow nuvno" 1 " movet sodervatx parametry wywoda" 1 " ispolxzuetsq dlq polu~eniq dopolnitelxnyh simwolow(funkcij), raspolovennyh w werhnej ~asti klawi{." 1 " Sodervimoe": 1 " SUB -";: 1 " Q -";: 1 " OTWET:": 1 " D -";: 1 " Algoritm: Programma:": 1 " wyzywaet pe~atx so stroki 150.": 1 " o o o" 1 " na |krane - ";: 1 " TO -k": 1 " Po~ti za 0.000 01 sekundy." 1 " Pered na~alom raboty nuvno" 1 " PRAWILXNYJ OTWET": 1 " OTWET:" 1 " Navnite na ";: 1 " M M M" 1 " GO -";: 1 " D ";: 1 " 7 STOP": 1 " 6 NEXT K": 1 " 5 PRINT X,Z": 1 " 5 PRINT X": 1 " 5 NEXT K": 1 " 5 IF K<16 THEN GO TO 3": 1 " 5 IF K<10 THEN GO TO 3": 1 " 4 STOP": 1 " 4 PRINT J": 1 " 4 LET Z=K+K": 1 " 3 LET K=K+2": 1 " 3 LET K=K+1": 1 " 3 LET J=11-K": 1 " 2 LET K=10": 1 " 2 LET K=1": 1 " 2 FOR K=10 TO 1 STEP -1": 1 " 2 FOR K=1 TO 8 STEP 1": 1 " 2 FOR K=1 TO 20 STEP 1": 1 " 2 FOR K=1 TO 10 STEP 3": 1 " 16 STOP": 1 " 15 RETURN": 1 " 15 IF K<X 1 " 14 NEXT K": 1 " 14 LET M=M*X": 1 " 13 LET M=M*X": 1 " 13 LET K=K+1": 1 " 12 LET K=0": 1 " 12 FOR K=1 TO X": 1 " 10 REM SUBROUTINE": 1 " 10 REM PODPROGRAMMA": 1 " 1 REM ZIKL6": 1 " 1 REM ZIKL4": 1 " 1 REM ZIKL2": 1 " 1 REM Z2": 1 " 1 REM DOWN": 1 " 1 REM CIKL2": 1 " 1 REM B1": 1 " 1 REM B": 1 " 1 ?" 1 " (Tgrinw=Tmosk+3~)" 1 " ! ! ... !": 1 " pri otricatelxnom argumente okruglenie proishodit k blivaj- {emu celomu ne bolx{emu,~em argument:";: 1 " pri kursore 1 " Q W E R T Y U I O P" 1 " q~eek:": 1 " naruvnu` powerhnostx,": 1 " A S D F G H J K L" 1 " 5. 1 " 4.CAPS SHIFT";: 1 " 3.prostoe navatie klawi{i": 1 " .RUN MX1:K52": 1 " pri kursore ";: 1 " Z X C V B N M" 1 " OTWET:" 1 " 0. Net." 1 " --KONEC ZANQTIQ--" 1 " " 1 " na |krane - ";: 1 " Wywod": 1 " <[>" 1 " 2m.": 1 " pri kursore 1 " WRITE": 1 " RUN": 1 " PRINT": 1 " O" 1 " 9 C=9" 1 " 64 H=64" 1 " 49 G=49" 1 " 4 B=4" 1 " 36 F=36" 1 " 25 E=25" 1 " 16 D=16" 1 " 1*2*3*4 ?" 1 " a kompx`ter wywedet otwet 4 t.e.koli~estwo bukw w slowe";: 1 " w 100 000 raz." 1 " S" 1 " A" 1 " Skolxko {agow?" 1 " PRINT X": 1 " 6 STOP": 1 " 5 PRINT X" 1 " X(8)->64" 1 " X(7)->49" 1 " 1 " 1 !fZ"Am!yZ"Dm! 1 !*t+58E-05 1 ! 1 ~enie, zapre}enie." 1 wyzywaet poqwlenie zaglawnyh bukw."; 1 wlovennymi ." 1 wid$ Prowidenie dostawilo programmu Nikola` Rod&onowu, daby sej blistatelxnyj muv 1 w zakl`~enie prodemonstriruem dejstwie grafi~eskih operatorow.": 1 vennaq |nergiq." 1 uslowie";: 1 urok 9 ": 1 urok 8 ": 1 urok 7 ": 1 urok 6 ": 1 urok 5 ": 1 urok 4 ": 1 urok 3 ": 1 urok 2 ": 1 urok 1 ": 1 to translate ? 1 taw stolbec ": 1 tangens h ": 1 sootwetstwu`}u` klawi{u. " 1 s ispolxzowaniem podprogrammy ": 1 rabo~$e sostoqn&e, a poeliku wozmovno i usower{$nstwowal 1 prowerqet zna~e-niq dwuh operandow.esli oni oba ne rawny 0,to rezulxtat operaciine rawen 0. " 1 primer programmy ( igra dlq 2 ~elowek - ugadaj ~islo) ": 1 poprobuj e}e raz": 1 peremennye ": 1 operato-rom 1 operaciq ";: 1 operacii otno{eniq wypolnq`tsq slewa naprawo posle wseh arifmeti~eskih operacij,t.e.urowenx star{instwa samyj nizkij i odinakowyj dlq wseh operacij otno{e- niq.rassmotrim dwe logi~eskie operacii";: 1 obu~a`}aq programma ": 1 obnulq`tsq wseperemennye,ispolxzu`]iesq w programme,a programma zapuskaetsq nawypolnenie.programma wypolnqetsqs perwoj stroki po porqdku. programmu movno wypolnqtx s l`boj stroki.dlq |togo nado w komande";: 1 ne wliqet na kl`~ewye slowa,a w revime kursora ";: 1 navmi l`bu` klawi{u" 1 navatie klawi{ w |tom revime priwodit k wwodu bukwy ili cifry,nanesennoj na klawi{e.dlq oboih revimow ";: 1 mednonogow w.s. A","A 1992 A","OKKKKKKKKKKKKKKKKKKKP" 1 liwatx otno{eniq" 1 l`bye operatory 1 kosinus h ": 1 konstanty ": 1 kakoj operator opisywaet razmernostx massiwa ?": 1 kakaq funkciq wy~islqet modulx ~isla ?": 1 kakaq funkciq wy~islqet korenx kwadratnyj iz ~isla ?": 1 i umnovitx na 180." 1 i priswaiwaet ego zna~e-nie uprawlq`}ej peremennoj ciklazatem wy~islqetsq wyraveniq pos-le slow";: 1 gde 'dlitelxnostx'i'wysota zwu-ka'nekotorye ~islowye wyraveniq.dlitelxnostx zadaetsq w sekundaha wysota w polutonah ot osnowno-go tona DO:pri polovitelxnyh ~islah-wy{e noty DO,pri otricatelx-nyh- nive noty DO." 1 g.glazow 1990 g.": 1 fioletowyj 1 esli uslowie istinno,to wypolnq`tsq operatory sledu`}ie posle ";: 1 dlq whoda w urok navmite 1 den|"''" 3. Kolihestvo projit{x dne 1 arktangens h " 1 arksinus h ": 1 arkkosinus h ": 1 arifmeti~eskie operacii " 1 \mocii, instinkty" 1 Zasten~iwyj,razumnyj" 1 Z A G R U V A E T S Q ": 1 Y.Kovalevsky /S.Peterburg/1991" 1 Wedu}imi w wa{ej vizni qwlq`tsq predpriim~iwostx i iniciatiwa. Wam nuvno po~uwstwowatx sebq podkontrolem i w to ve wremq neza- wisimym, ~toby osu}estwitxsq. Wam nuvno ~to-to postoqnnoe dlq togo, ~toby zawer{itx na~atoe. Wy materialist i prakti~nyj ~e- lowek. I}ite obespe~ennosti. Wy twor~eskaq li~nostx s qrkimumom. Inogda bywaete neposledo- watelxny. Umejte wyslu{iwatx, rasslablqtxsq i sobiratxsq. Budxte sosredoto~enny . 1 WEER dlitelxnostx,wysota zwuka 1 VERYFY,LOAD,MERGE ";: 1 VERIFY ";: 1 Utwerditelxnyj,dogmat." 1 Uspeh, rost" 1 Twor~eskij,weselyj" 1 Sposobnostx ustanaw- 1 Samokontrolx, ograni- 1 Razumnyj,pokrowit." 1 RUN 100 ";: 1 RETURN ": 1 RESTORE": 1 RESTORE ";: 1 RESTORE ": 1 RADIANAH 1 Pylkij, skrytnyj" 1 Pritqgatelxnyj" 1 PRINT AT 11,16;""*""";: 1 PODPROGRAMMY." 1 PLOT X,Y ";: 1 PAPER 1": 1 PAPER ";: 1 Ostorovnyj,~estol`biw." 1 Ostorovnyj,mnogostor." 1 O G L A W L E N I E " 1 O G L A W L E N I E 1 New name of file 1 MERGE ";: 1 LPRINT ": 1 LOGa X=LN X/LN a ": 1 LOAD,SAVE,VERIFY, MERGE." 1 LIST 150 ";: 1 Kriti~eskij,doto{nyj" 1 Issledowat.,obosobl." 1 Intellekt,ob}itelxn." 1 Indiwidualxnostx" 1 I16.FAV B 1 Glubokij,me~tatelxnyj" 1 Garmoni~nyj,sobrannyj" 1 GO TO N ";: 1 GO SUB N ": 1 GO SUB , RETURN ";: 1 FLASH ";: 1 Disk by LagSoft 14.02.1994 1 DRAW X,Y ";: 1 DIM C(3,6) ": 1 DIM B(5) ";: 1 DELETE ( CAPS SHIFT + 0 )" 1 DELETE ";: 1 COPPER FEET , 1992": 1 CONTINUE ";: 1 CIRCLE X,Y,R ";: 1 CAPS SHIFT ";: 1 BRIGHT ";: 1 BREAK ";: 1 BORDER 3": 1 BORDER 2": 1 BORDER 1": 1 BORDER ";: 1 Agressiwnostx, prilo- 1 AND,OR ";: 1 AND , OR ";: 1 A C E H.": 1 ; 1 : 1 60 INPUT X 70 IF X 1 23 , 0 , 34567" 1 20 PRINT A/2": 1 1992 Copper Feet"; 1 1992 Copper Feet Mednonogov A.S. 1 1992 Copper Feet 1 1991 by InterCompex" 1 1983 by Somerville" 1 1030 GO TO 1000": 1 1020 PRINT ""0.";: 1 10 LET C=234 (C=234) 20 LET C=C-4 (C=230) ": 1 10 INPUT";: 1 10 INPUT X 20 IF X 1 - |ksponenta - E w stepeni h( E=2.718281...)" 1 (om 1581r.)";#q;" 1 (CAPS SHIFT+1)," 1 ! 1 ! 1 wypolnq`tsq tak: operator";: 1 primer ": 1 operatory bejsika ": 1 massiwy ": 1 kakaq komanda sluvit dlq zapuska programmy na wypolnenie ?": 1 i}et ukazannu` programmu, on wywodit imena wseh programm,uve pro~itannyh s lenty." 1 i Pluton r osta`tsq wodnih i teh ve znakah w te~eniimnogih let i po|tomu ime`t boleesilxnoe wliqnie, ~em wnutrennie."; 1 i 2, zatem wwedite nomer uroka-(1-20) ili 0 dlq buta": 1 at 'stroka','stolbec' 1 XOPT B.H." 1 Skorpion 1 RABOTA S MAGNITOFONOM " 1 PROGRAMMIROWANIE ZWUKOW ": 1 Continue ? 1 CIKLY " 1 Bliznecy 1 6. 1 5. _______ 6. ___ ___ 7. _______ 8. ___ ___ 1 5. 1 4. 1 3. 1 2. 1 10 FOR N=1 TO 10 20 READ B(N) 30 NEXT N 40 DATA 10,2,5,3,6,7,3,12,1,0": 1 1. _______ 2. ___ ___ 3. _______ 4. ___ ___ 1 1. 1 "GORBISOFT" 1 "ENTER" 1 ~ A S T X W T O R A Q ": 1 primer ": 1 blok dannyh " 1 PODPROGRAMMy ": 1 Find name 1 40 GO TO 10 50 LET Y=SIN X/X" 1 |tot parametr pereme}aet pozici`wywoda w mesto,opredelqemoe nomerom stroki i stolbca.nomer stro-ki menqetsq ot 0 do 21,a nomer stolbca ot 0 do 31." 1 priswaiwaet peremennym";: 1 obu~a`}aq programma ": 1 Oblastx aktiwnosti 1 FOR X=3 TO 10 STEP 2 LET X=12 LET A=1 1 wy~er~iwaetsq polnaq okruvnostx." 1 _______ _______ _______ _______ 1 ___ ___ _______ ___ ___ ___ ___ 1 62. 1 58. 1 28. 1 21. 1 18. 1 W takom 1 File 1 52. 1 11. 1 10. 1 I%n| I%l| Avgust Sentybr| Oktybr| Noybr| Dekabr| 1 zapisywaet programmu i peremen-nye na magnitofon.": 1 10 LET C=234": 1 G O R O S K O P 1 20 LET C=C-4": 1 BIORITM\ 1 1.2 h10 w 34 stepeni = 1.2e34 0.000000002 = 2e-9" 1 4 - 1 GO TO 130 FOR A=1 1 6 - 1 5 - 1 3 - 1 0O TO 130 0O TO 5 0LS 0LS 0IST 0IST 0ET B=A 0RINT W 0ETURN 0EXT R 0ET Z=X r 1 7 - 1 R 1 2 - 1 THIS PROGRAMME HAS BEEN PREPARED BY A PROFESSIONAL ASTROLOGER AND MEMBER OF THE ASTROLOGICAL ASSOCIATION *G 1 " 1 Mednonogov V.S. 1 * * * * ** * * * * * * V 1 1 1 1 1 1 1 1